home *** CD-ROM | disk | FTP | other *** search
/ Apple WWDC 1996 / WWDC96_1996 (CD).toast / Technology Materials / MacOS 8 Resources / Developer Tools / Mac OS 8 Interfaces & Libraries / Interfaces / AIncludes / Movies.a < prev    next >
Encoding:
Text File  |  1996-05-01  |  130.6 KB  |  6,153 lines  |  [TEXT/MPS ]
  1. ;
  2. ;    File:        Movies.a
  3. ;
  4. ;    Contains:    QuickTime Interfaces.
  5. ;
  6. ;    Version:    Technology:    QuickTime 2.1
  7. ;                Release:    Universal Interfaces 3.0d3 on Copland DR1
  8. ;
  9. ;    Copyright:    © 1984-1996 by Apple Computer, Inc.  All rights reserved.
  10. ;
  11. ;    Bugs?:        If you find a problem with this file, send the file and version
  12. ;                information (from above) and the problem description to:
  13. ;
  14. ;                    Internet:    apple.bugs@applelink.apple.com
  15. ;                    AppleLink:    APPLE.BUGS
  16. ;
  17. ;
  18.     IF &TYPE('__MOVIES__') = 'UNDEFINED' THEN
  19. __MOVIES__ SET 1
  20.  
  21.     IF &TYPE('__QUICKDRAW__') = 'UNDEFINED' THEN
  22.     include 'Quickdraw.a'
  23.     ENDIF
  24.     IF &TYPE('__ALIASES__') = 'UNDEFINED' THEN
  25.     include 'Aliases.a'
  26.     ENDIF
  27.     IF &TYPE('__EVENTS__') = 'UNDEFINED' THEN
  28.     include 'Events.a'
  29.     ENDIF
  30.     IF &TYPE('__MENUS__') = 'UNDEFINED' THEN
  31.     include 'Menus.a'
  32.     ENDIF
  33.     IF &TYPE('__COMPONENTS__') = 'UNDEFINED' THEN
  34.     include 'Components.a'
  35.     ENDIF
  36.     IF &TYPE('__IMAGECOMPRESSION__') = 'UNDEFINED' THEN
  37.     include 'ImageCompression.a'
  38.     ENDIF
  39.     IF FOR_SYSTEM7_AND_SYSTEM8_COOPERATIVE THEN
  40. ;   "kFix1" is defined in FixMath as "fixed1"  
  41. ;  error codes are in Errors.[haa] 
  42. ;  gestalt codes are in Gestalt.[hpa] 
  43.  
  44. MovieFileType                    EQU        'MooV'
  45.  
  46. MediaHandlerType                EQU        'mhlr'
  47. DataHandlerType                    EQU        'dhlr'
  48.  
  49. VideoMediaType                    EQU        'vide'
  50. SoundMediaType                    EQU        'soun'
  51. TextMediaType                    EQU        'text'
  52. BaseMediaType                    EQU        'gnrc'
  53. MPEGMediaType                    EQU        'MPEG'
  54. MusicMediaType                    EQU        'musi'
  55. TimeCodeMediaType                EQU        'tmcd'
  56. SpriteMediaType                    EQU        'sprt'
  57. HandleDataHandlerSubType        EQU        'hndl'
  58.  
  59. VisualMediaCharacteristic        EQU        'eyes'
  60. AudioMediaCharacteristic        EQU        'ears'
  61.  
  62. DoTheRightThing                    EQU        0
  63. MovieRecord                RECORD 0
  64. data                     ds.l    1                ; offset: $0 (0) <-- really an array of length one
  65. sizeof                     EQU *                    ; size:   $4 (4)
  66.                         ENDR
  67. ; typedef struct MovieRecord *            Movie
  68.  
  69. TrackRecord                RECORD 0
  70. data                     ds.l    1                ; offset: $0 (0) <-- really an array of length one
  71. sizeof                     EQU *                    ; size:   $4 (4)
  72.                         ENDR
  73. ; typedef struct TrackRecord *            Track
  74.  
  75. MediaRecord                RECORD 0
  76. data                     ds.l    1                ; offset: $0 (0) <-- really an array of length one
  77. sizeof                     EQU *                    ; size:   $4 (4)
  78.                         ENDR
  79. ; typedef struct MediaRecord *            Media
  80.  
  81. UserDataRecord            RECORD 0
  82. data                     ds.l    1                ; offset: $0 (0) <-- really an array of length one
  83. sizeof                     EQU *                    ; size:   $4 (4)
  84.                         ENDR
  85. ; typedef struct UserDataRecord *        UserData
  86.  
  87. TrackEditStateRecord    RECORD 0
  88. data                     ds.l    1                ; offset: $0 (0) <-- really an array of length one
  89. sizeof                     EQU *                    ; size:   $4 (4)
  90.                         ENDR
  91. ; typedef struct TrackEditStateRecord *    TrackEditState
  92.  
  93. MovieEditStateRecord    RECORD 0
  94. data                     ds.l    1                ; offset: $0 (0) <-- really an array of length one
  95. sizeof                     EQU *                    ; size:   $4 (4)
  96.                         ENDR
  97. ; typedef struct MovieEditStateRecord *    MovieEditState
  98.  
  99. SampleDescription        RECORD 0
  100. descSize                 ds.l    1                ; offset: $0 (0)
  101. dataFormat                 ds.l    1                ; offset: $4 (4)
  102. resvd1                     ds.l    1                ; offset: $8 (8)
  103. resvd2                     ds.w    1                ; offset: $C (12)
  104. dataRefIndex             ds.w    1                ; offset: $E (14)
  105. sizeof                     EQU *                    ; size:   $10 (16)
  106.                         ENDR
  107. ; typedef struct SampleDescription *    SampleDescriptionPtr
  108.  
  109. ; typedef SampleDescriptionPtr *        SampleDescriptionHandle
  110.  
  111. SpriteWorldRecord        RECORD 0
  112. data                     ds.l    1                ; offset: $0 (0) <-- really an array of length one
  113. sizeof                     EQU *                    ; size:   $4 (4)
  114.                         ENDR
  115. ; typedef struct SpriteWorldRecord *    SpriteWorld
  116.  
  117. SpriteRecord            RECORD 0
  118. data                     ds.l    1                ; offset: $0 (0) <-- really an array of length one
  119. sizeof                     EQU *                    ; size:   $4 (4)
  120.                         ENDR
  121. Sprite                    RECORD 0
  122. f                         ds        SpriteRecord
  123. sizeof                     EQU *                    ; size:   $4 (4)
  124.                         ENDR
  125.  
  126.  
  127. ; typedef Handle                         QTAtomContainer
  128.  
  129. ; typedef long                             QTAtom
  130.  
  131. ; typedef long                             QTAtomType
  132.  
  133. ; typedef long                             QTAtomID
  134.  
  135. SoundDescription        RECORD 0
  136. descSize                 ds.l    1                ; offset: $0 (0)        ;  total size of SoundDescription including extra data 
  137. dataFormat                 ds.l    1                ; offset: $4 (4)        ;   
  138. resvd1                     ds.l    1                ; offset: $8 (8)        ;  reserved for apple use 
  139. resvd2                     ds.w    1                ; offset: $C (12)
  140. dataRefIndex             ds.w    1                ; offset: $E (14)
  141. version                     ds.w    1                ; offset: $10 (16)        ;  which version is this data 
  142. revlevel                 ds.w    1                ; offset: $12 (18)        ;  what version of that codec did this 
  143. vendor                     ds.l    1                ; offset: $14 (20)        ;  whose  codec compressed this data 
  144. numChannels                 ds.w    1                ; offset: $18 (24)        ;  number of channels of sound 
  145. sampleSize                 ds.w    1                ; offset: $1A (26)        ;  number of bits per sample 
  146. compressionID             ds.w    1                ; offset: $1C (28)        ;  sound compression used, 0 if none 
  147. packetSize                 ds.w    1                ; offset: $1E (30)        ;  packet size for compression, 0 if no compression 
  148. sampleRate                 ds.l    1                ; offset: $20 (32)        ;  sample rate sound is captured at 
  149. sizeof                     EQU *                    ; size:   $24 (36)
  150.                         ENDR
  151. ; typedef struct SoundDescription *        SoundDescriptionPtr
  152.  
  153. ; typedef SoundDescriptionPtr *            SoundDescriptionHandle
  154.  
  155. TextDescription            RECORD 0
  156. descSize                 ds.l    1                ; offset: $0 (0)        ;  Total size of TextDescription
  157. dataFormat                 ds.l    1                ; offset: $4 (4)        ;  'text'
  158. resvd1                     ds.l    1                ; offset: $8 (8)
  159. resvd2                     ds.w    1                ; offset: $C (12)
  160. dataRefIndex             ds.w    1                ; offset: $E (14)
  161. displayFlags             ds.l    1                ; offset: $10 (16)        ;  see enum below for flag values
  162. textJustification         ds.l    1                ; offset: $14 (20)        ;  Can be: teCenter,teFlush -Default,-Right,-Left
  163. bgColor                     ds        RGBColor        ; offset: $18 (24)        ;  Background color
  164. defaultTextBox             ds        Rect            ; offset: $1E (30)        ;  Location to place the text within the track bounds
  165. defaultStyle             ds        ScrpSTElement    ; offset: $26 (38)        ;  Default style (struct defined in TextEdit.h)
  166. defaultFontName             ds.b    1                ; offset: $3A (58) <-- really an array of length one ;  Font Name (pascal string - struct extended to fit) 
  167.                          ORG 60
  168. sizeof                     EQU *                    ; size:   $3C (60)
  169.                         ENDR
  170. ; typedef struct TextDescription *        TextDescriptionPtr
  171.  
  172. ; typedef TextDescriptionPtr *            TextDescriptionHandle
  173.  
  174. DataReferenceRecord        RECORD 0
  175. dataRefType                 ds.l    1                ; offset: $0 (0)
  176. dataRef                     ds.l    1                ; offset: $4 (4)
  177. sizeof                     EQU *                    ; size:   $8 (8)
  178.                         ENDR
  179. ; typedef struct DataReferenceRecord *    DataReferencePtr
  180.  
  181. ;
  182. ;--------------------------
  183. ;  Music Sample Description
  184. ;--------------------------
  185. ;
  186. MusicDescription        RECORD 0
  187. descSize                 ds.l    1                ; offset: $0 (0)
  188. dataFormat                 ds.l    1                ; offset: $4 (4)        ;  'musi' 
  189. resvd1                     ds.l    1                ; offset: $8 (8)
  190. resvd2                     ds.w    1                ; offset: $C (12)
  191. dataRefIndex             ds.w    1                ; offset: $E (14)
  192. musicFlags                 ds.l    1                ; offset: $10 (16)
  193. headerData                 ds.l    1                ; offset: $14 (20) <-- really an array of length one ;  variable size! 
  194. sizeof                     EQU *                    ; size:   $18 (24)
  195.                         ENDR
  196. ; typedef struct MusicDescription *        MusicDescriptionPtr
  197.  
  198. ; typedef MusicDescriptionPtr *            MusicDescriptionHandle
  199.  
  200.  
  201. dfDontDisplay                    EQU        $01                    ; Don't display the text
  202. dfDontAutoScale                    EQU        $02                    ; Don't scale text as track bounds grows or shrinks
  203. dfClipToTextBox                    EQU        $04                    ; Clip update to the textbox
  204. dfUseMovieBGColor                EQU        $08                    ; Set text background to movie's background color
  205. dfShrinkTextBoxToFit            EQU        $10                    ; Compute minimum box to fit the sample
  206. dfScrollIn                        EQU        $20                    ; Scroll text in until last of text is in view 
  207. dfScrollOut                        EQU        $40                    ; Scroll text out until last of text is gone (if both set, scroll in then out)
  208. dfHorizScroll                    EQU        $80                    ; Scroll text horizontally (otherwise it's vertical)
  209. dfReverseScroll                    EQU        $0100                ; vert: scroll down rather than up; horiz: scroll backwards (justfication dependent)
  210. dfContinuousScroll                EQU        $0200                ; new samples cause previous samples to scroll out 
  211. dfFlowHoriz                        EQU        $0400                ; horiz scroll text flows in textbox rather than extend to right 
  212. dfDropShadow                    EQU        $1000                ; display text with a drop shadow 
  213. dfAntiAlias                        EQU        $2000                ; attempt to display text anti aliased
  214. dfKeyedText                        EQU        $4000                ; key the text over background
  215. dfInverseHilite                    EQU        $8000                ; Use inverse hiliting rather than using hilite color
  216.  
  217. searchTextDontGoToFoundTime        EQU        $00010000
  218. searchTextDontHiliteFoundText    EQU        $00020000
  219. searchTextOneTrackOnly            EQU        $00040000
  220. searchTextEnabledTracksOnly        EQU        $00080000
  221. ;  progress messages 
  222.  
  223. movieProgressOpen                EQU        0
  224. movieProgressUpdatePercent        EQU        1
  225. movieProgressClose                EQU        2
  226. ;  progress operations 
  227.  
  228. progressOpFlatten                EQU        1
  229. progressOpInsertTrackSegment    EQU        2
  230. progressOpInsertMovieSegment    EQU        3
  231. progressOpPaste                    EQU        4
  232. progressOpAddMovieSelection        EQU        5
  233. progressOpCopy                    EQU        6
  234. progressOpCut                    EQU        7
  235. progressOpLoadMovieIntoRam        EQU        8
  236. progressOpLoadTrackIntoRam        EQU        9
  237. progressOpLoadMediaIntoRam        EQU        10
  238. progressOpImportMovie            EQU        11
  239. progressOpExportMovie            EQU        12
  240.  
  241. mediaQualityDraft                EQU        $0000
  242. mediaQualityNormal                EQU        $0040
  243. mediaQualityBetter                EQU        $0080
  244. mediaQualityBest                EQU        $00C0
  245. ; typedef ComponentInstance             MediaHandler
  246.  
  247. ; typedef ComponentInstance             DataHandler
  248.  
  249. ; typedef Component                     MediaHandlerComponent
  250.  
  251. ; typedef Component                     DataHandlerComponent
  252.  
  253. ; typedef ComponentResult                 HandlerError
  254.  
  255. ;  TimeBase equates 
  256. ; typedef long                             TimeValue
  257.  
  258. ; typedef long                             TimeScale
  259.  
  260. CompTimeValue            RECORD 0
  261. f                         ds        wide
  262. sizeof                     EQU *                    ; size:   $8 (8)
  263.                         ENDR
  264.  
  265.  
  266.  
  267. loopTimeBase                    EQU        1
  268. palindromeLoopTimeBase            EQU        2
  269. maintainTimeBaseZero            EQU        4
  270. ; typedef unsigned long                 TimeBaseFlags
  271.  
  272. TimeBaseRecord            RECORD 0
  273. data                     ds.l    1                ; offset: $0 (0) <-- really an array of length one
  274. sizeof                     EQU *                    ; size:   $4 (4)
  275.                         ENDR
  276. ; typedef struct TimeBaseRecord *        TimeBase
  277.  
  278. CallBackRecord            RECORD 0
  279. data                     ds.l    1                ; offset: $0 (0) <-- really an array of length one
  280. sizeof                     EQU *                    ; size:   $4 (4)
  281.                         ENDR
  282. ; typedef struct CallBackRecord *        QTCallBack
  283.  
  284. TimeRecord                RECORD 0
  285. value                     ds        CompTimeValue    ; offset: $0 (0)        ;  units 
  286. scale                     ds.l    1                ; offset: $8 (8)        ;  units per second 
  287. base                     ds.l    1                ; offset: $C (12)
  288. sizeof                     EQU *                    ; size:   $10 (16)
  289.                         ENDR
  290. ;  CallBack equates 
  291.  
  292. triggerTimeFwd                    EQU        $0001                ; when curTime exceeds triggerTime going forward 
  293. triggerTimeBwd                    EQU        $0002                ; when curTime exceeds triggerTime going backwards 
  294. triggerTimeEither                EQU        $0003                ; when curTime exceeds triggerTime going either direction 
  295. triggerRateLT                    EQU        $0004                ; when rate changes to less than trigger value 
  296. triggerRateGT                    EQU        $0008                ; when rate changes to greater than trigger value 
  297. triggerRateEqual                EQU        $0010                ; when rate changes to equal trigger value 
  298. triggerRateLTE                    EQU        $0014
  299. triggerRateGTE                    EQU        $0018
  300. triggerRateNotEqual                EQU        $001C
  301. triggerRateChange                EQU        0
  302. triggerAtStart                    EQU        $0001
  303. triggerAtStop                    EQU        $0002
  304. ; typedef unsigned short                 QTCallBackFlags
  305.  
  306.  
  307. timeBaseBeforeStartTime            EQU        1
  308. timeBaseAfterStopTime            EQU        2
  309. ; typedef unsigned long                 TimeBaseStatus
  310.  
  311.  
  312. callBackAtTime                    EQU        1
  313. callBackAtRate                    EQU        2
  314. callBackAtTimeJump                EQU        3
  315. callBackAtExtremes                EQU        4
  316. callBackAtInterrupt                EQU        $8000
  317. callBackAtDeferredTask            EQU        $4000
  318. ; typedef unsigned short                 QTCallBackType
  319.  
  320.  
  321. qtcbNeedsRateChanges            EQU        1                    ; wants to know about rate changes 
  322. qtcbNeedsTimeChanges            EQU        2                    ; wants to know about time changes 
  323. qtcbNeedsStartStopChanges        EQU        4                    ; wants to know when TimeBase start/stop is changed
  324. QTCallBackHeader        RECORD 0
  325. callBackFlags             ds.l    1                ; offset: $0 (0)
  326. reserved1                 ds.l    1                ; offset: $4 (4)
  327. qtPrivate                 ds.b    40                ; offset: $8 (8)
  328. sizeof                     EQU *                    ; size:   $30 (48)
  329.                         ENDR
  330. QTSyncTaskRecord        RECORD 0
  331. qLink                     ds.l    1                ; offset: $0 (0)
  332. proc                     ds.l    1                ; offset: $4 (4)
  333. sizeof                     EQU *                    ; size:   $8 (8)
  334.                         ENDR
  335. ; typedef struct QTSyncTaskRecord *        QTSyncTaskPtr
  336.  
  337.  
  338. keepInRam                        EQU        $01                    ; load and make non-purgable
  339. unkeepInRam                        EQU        $02                    ; mark as purgable
  340. flushFromRam                    EQU        $04                    ; empty those handles
  341. loadForwardTrackEdits            EQU        $08                    ;    load track edits into ram for playing forward
  342. loadBackwardTrackEdits            EQU        $10                    ;    load track edits into ram for playing in reverse
  343.  
  344. newMovieActive                    EQU        $01
  345. newMovieDontResolveDataRefs        EQU        $02
  346. newMovieDontAskUnresolvedDataRefs EQU    $04
  347. newMovieDontAutoAlternates        EQU        $08
  348. ;  track usage bits 
  349.  
  350. trackUsageInMovie                EQU        $02
  351. trackUsageInPreview                EQU        $04
  352. trackUsageInPoster                EQU        $08
  353. ;  Add/GetMediaSample flags 
  354.  
  355. mediaSampleNotSync                EQU        $01                    ; sample is not a sync sample (eg. is frame differenced 
  356. mediaSampleShadowSync            EQU        $02                    ; sample is a shadow sync 
  357.  
  358. pasteInParallel                    EQU        1
  359. showUserSettingsDialog            EQU        2
  360. movieToFileOnlyExport            EQU        4
  361. movieFileSpecValid                EQU        8
  362.  
  363. nextTimeMediaSample                EQU        $01
  364. nextTimeMediaEdit                EQU        $02
  365. nextTimeTrackEdit                EQU        $04
  366. nextTimeSyncSample                EQU        $08
  367. nextTimeStep                    EQU        $10
  368. nextTimeEdgeOK                    EQU        $4000
  369. nextTimeIgnoreActiveSegment        EQU        $8000
  370. ; typedef unsigned short                 nextTimeFlagsEnum
  371.  
  372.  
  373. createMovieFileDeleteCurFile    EQU        $80000000
  374. createMovieFileDontCreateMovie    EQU        $40000000
  375. createMovieFileDontOpenFile        EQU        $20000000
  376. ; typedef unsigned long                 createMovieFileFlagsEnum
  377.  
  378.  
  379. flattenAddMovieToDataFork        EQU        $00000001
  380. flattenActiveTracksOnly            EQU        $00000004
  381. flattenDontInterleaveFlatten    EQU        $00000008
  382. flattenFSSpecPtrIsDataRefRecordPtr EQU    $00000010
  383. ; typedef unsigned long                 movieFlattenFlagsEnum
  384.  
  385.  
  386. movieInDataForkResID            EQU        -1                    ; magic res ID 
  387.  
  388. mcTopLeftMovie                    EQU        $01                    ; usually centered 
  389. mcScaleMovieToFit                EQU        $02                    ; usually only scales down 
  390. mcWithBadge                        EQU        $04                    ; give me a badge 
  391. mcNotVisible                    EQU        $08                    ; don't show controller 
  392. mcWithFrame                        EQU        $10                    ; gimme a frame 
  393.  
  394. movieScrapDontZeroScrap            EQU        $01
  395. movieScrapOnlyPutMovie            EQU        $02
  396.  
  397. dataRefSelfReference            EQU        $01
  398. dataRefWasNotResolved            EQU        $02
  399. ; typedef unsigned long                 dataRefAttributesFlags
  400.  
  401.  
  402. hintsScrubMode                    EQU        $01                    ; mask == && (if flags == scrub on, flags != scrub off) 
  403. hintsLoop                        EQU        $02
  404. hintsDontPurge                    EQU        $04
  405. hintsUseScreenBuffer            EQU        $20
  406. hintsAllowInterlace                EQU        $40
  407. hintsUseSoundInterp                EQU        $80
  408. hintsHighQuality                EQU        $0100                ; slooooow 
  409. hintsPalindrome                    EQU        $0200
  410. hintsInactive                    EQU        $0800
  411. ; typedef unsigned long                 playHintsEnum
  412.  
  413.  
  414. mediaHandlerFlagBaseClient        EQU        1
  415. ; typedef unsigned long                 mediaHandlerFlagsEnum
  416.  
  417.  
  418. movieTrackMediaType                EQU        $01
  419. movieTrackCharacteristic        EQU        $02
  420. movieTrackEnabledOnly            EQU        $04
  421. SampleReferenceRecord    RECORD 0
  422. dataOffset                 ds.l    1                ; offset: $0 (0)
  423. dataSize                 ds.l    1                ; offset: $4 (4)
  424. durationPerSample         ds.l    1                ; offset: $8 (8)
  425. numberOfSamples             ds.l    1                ; offset: $C (12)
  426. sampleFlags                 ds.w    1                ; offset: $10 (16)
  427. sizeof                     EQU *                    ; size:   $12 (18)
  428.                         ENDR
  429. ; typedef struct SampleReferenceRecord * SampleReferencePtr
  430.  
  431. ;
  432. ;************************
  433. ;* Initialization Routines 
  434. ;*************************
  435. ;
  436. ;
  437. ; pascal OSErr EnterMovies(void )
  438. ;
  439.     IF ¬ GENERATINGCFM THEN
  440.         Macro
  441.         _EnterMovies
  442.             moveq               #1,D0
  443.             dc.w                $AAAA
  444.         EndM
  445.     ELSE
  446.         IMPORT_CFM_FUNCTION EnterMovies
  447.     ENDIF
  448.  
  449. ;
  450. ; pascal void ExitMovies(void )
  451. ;
  452.     IF ¬ GENERATINGCFM THEN
  453.         Macro
  454.         _ExitMovies
  455.             moveq               #2,D0
  456.             dc.w                $AAAA
  457.         EndM
  458.     ELSE
  459.         IMPORT_CFM_FUNCTION ExitMovies
  460.     ENDIF
  461.  
  462. ;
  463. ;************************
  464. ;* Error Routines 
  465. ;*************************
  466. ;
  467. ;
  468. ; pascal OSErr GetMoviesError(void )
  469. ;
  470.     IF ¬ GENERATINGCFM THEN
  471.         Macro
  472.         _GetMoviesError
  473.             moveq               #3,D0
  474.             dc.w                $AAAA
  475.         EndM
  476.     ELSE
  477.         IMPORT_CFM_FUNCTION GetMoviesError
  478.     ENDIF
  479.  
  480. ;
  481. ; pascal void ClearMoviesStickyError(void )
  482. ;
  483.     IF ¬ GENERATINGCFM THEN
  484.         Macro
  485.         _ClearMoviesStickyError
  486.             move.w              #$00DE,D0
  487.             dc.w                $AAAA
  488.         EndM
  489.     ELSE
  490.         IMPORT_CFM_FUNCTION ClearMoviesStickyError
  491.     ENDIF
  492.  
  493. ;
  494. ; pascal OSErr GetMoviesStickyError(void )
  495. ;
  496.     IF ¬ GENERATINGCFM THEN
  497.         Macro
  498.         _GetMoviesStickyError
  499.             moveq               #4,D0
  500.             dc.w                $AAAA
  501.         EndM
  502.     ELSE
  503.         IMPORT_CFM_FUNCTION GetMoviesStickyError
  504.     ENDIF
  505.  
  506. ;
  507. ; pascal void SetMoviesErrorProc(MoviesErrorUPP errProc, long refcon)
  508. ;
  509.     IF ¬ GENERATINGCFM THEN
  510.         Macro
  511.         _SetMoviesErrorProc
  512.             move.w              #$00EF,D0
  513.             dc.w                $AAAA
  514.         EndM
  515.     ELSE
  516.         IMPORT_CFM_FUNCTION SetMoviesErrorProc
  517.     ENDIF
  518.  
  519. ;
  520. ;************************
  521. ;* Idle Routines 
  522. ;*************************
  523. ;
  524. ;
  525. ; pascal void MoviesTask(Movie theMovie, long maxMilliSecToUse)
  526. ;
  527.     IF ¬ GENERATINGCFM THEN
  528.         Macro
  529.         _MoviesTask
  530.             moveq               #5,D0
  531.             dc.w                $AAAA
  532.         EndM
  533.     ELSE
  534.         IMPORT_CFM_FUNCTION MoviesTask
  535.     ENDIF
  536.  
  537. ;
  538. ; pascal OSErr PrerollMovie(Movie theMovie, TimeValue time, Fixed Rate)
  539. ;
  540.     IF ¬ GENERATINGCFM THEN
  541.         Macro
  542.         _PrerollMovie
  543.             moveq               #6,D0
  544.             dc.w                $AAAA
  545.         EndM
  546.     ELSE
  547.         IMPORT_CFM_FUNCTION PrerollMovie
  548.     ENDIF
  549.  
  550. ;
  551. ; pascal OSErr LoadMovieIntoRam(Movie theMovie, TimeValue time, TimeValue duration, long flags)
  552. ;
  553.     IF ¬ GENERATINGCFM THEN
  554.         Macro
  555.         _LoadMovieIntoRam
  556.             moveq               #7,D0
  557.             dc.w                $AAAA
  558.         EndM
  559.     ELSE
  560.         IMPORT_CFM_FUNCTION LoadMovieIntoRam
  561.     ENDIF
  562.  
  563. ;
  564. ; pascal OSErr LoadTrackIntoRam(Track theTrack, TimeValue time, TimeValue duration, long flags)
  565. ;
  566.     IF ¬ GENERATINGCFM THEN
  567.         Macro
  568.         _LoadTrackIntoRam
  569.             move.w              #$016E,D0
  570.             dc.w                $AAAA
  571.         EndM
  572.     ELSE
  573.         IMPORT_CFM_FUNCTION LoadTrackIntoRam
  574.     ENDIF
  575.  
  576. ;
  577. ; pascal OSErr LoadMediaIntoRam(Media theMedia, TimeValue time, TimeValue duration, long flags)
  578. ;
  579.     IF ¬ GENERATINGCFM THEN
  580.         Macro
  581.         _LoadMediaIntoRam
  582.             moveq               #8,D0
  583.             dc.w                $AAAA
  584.         EndM
  585.     ELSE
  586.         IMPORT_CFM_FUNCTION LoadMediaIntoRam
  587.     ENDIF
  588.  
  589. ;
  590. ; pascal void SetMovieActive(Movie theMovie, Boolean active)
  591. ;
  592.     IF ¬ GENERATINGCFM THEN
  593.         Macro
  594.         _SetMovieActive
  595.             moveq               #9,D0
  596.             dc.w                $AAAA
  597.         EndM
  598.     ELSE
  599.         IMPORT_CFM_FUNCTION SetMovieActive
  600.     ENDIF
  601.  
  602. ;
  603. ; pascal Boolean GetMovieActive(Movie theMovie)
  604. ;
  605.     IF ¬ GENERATINGCFM THEN
  606.         Macro
  607.         _GetMovieActive
  608.             moveq               #10,D0
  609.             dc.w                $AAAA
  610.         EndM
  611.     ELSE
  612.         IMPORT_CFM_FUNCTION GetMovieActive
  613.     ENDIF
  614.  
  615. ;
  616. ;************************
  617. ;* calls for playing movies, previews, posters
  618. ;*************************
  619. ;
  620. ;
  621. ; pascal void StartMovie(Movie theMovie)
  622. ;
  623.     IF ¬ GENERATINGCFM THEN
  624.         Macro
  625.         _StartMovie
  626.             moveq               #11,D0
  627.             dc.w                $AAAA
  628.         EndM
  629.     ELSE
  630.         IMPORT_CFM_FUNCTION StartMovie
  631.     ENDIF
  632.  
  633. ;
  634. ; pascal void StopMovie(Movie theMovie)
  635. ;
  636.     IF ¬ GENERATINGCFM THEN
  637.         Macro
  638.         _StopMovie
  639.             moveq               #12,D0
  640.             dc.w                $AAAA
  641.         EndM
  642.     ELSE
  643.         IMPORT_CFM_FUNCTION StopMovie
  644.     ENDIF
  645.  
  646. ;
  647. ; pascal void GoToBeginningOfMovie(Movie theMovie)
  648. ;
  649.     IF ¬ GENERATINGCFM THEN
  650.         Macro
  651.         _GoToBeginningOfMovie
  652.             moveq               #13,D0
  653.             dc.w                $AAAA
  654.         EndM
  655.     ELSE
  656.         IMPORT_CFM_FUNCTION GoToBeginningOfMovie
  657.     ENDIF
  658.  
  659. ;
  660. ; pascal void GoToEndOfMovie(Movie theMovie)
  661. ;
  662.     IF ¬ GENERATINGCFM THEN
  663.         Macro
  664.         _GoToEndOfMovie
  665.             moveq               #14,D0
  666.             dc.w                $AAAA
  667.         EndM
  668.     ELSE
  669.         IMPORT_CFM_FUNCTION GoToEndOfMovie
  670.     ENDIF
  671.  
  672. ;
  673. ; pascal Boolean IsMovieDone(Movie theMovie)
  674. ;
  675.     IF ¬ GENERATINGCFM THEN
  676.         Macro
  677.         _IsMovieDone
  678.             move.w              #$00DD,D0
  679.             dc.w                $AAAA
  680.         EndM
  681.     ELSE
  682.         IMPORT_CFM_FUNCTION IsMovieDone
  683.     ENDIF
  684.  
  685. ;
  686. ; pascal Boolean GetMoviePreviewMode(Movie theMovie)
  687. ;
  688.     IF ¬ GENERATINGCFM THEN
  689.         Macro
  690.         _GetMoviePreviewMode
  691.             moveq               #15,D0
  692.             dc.w                $AAAA
  693.         EndM
  694.     ELSE
  695.         IMPORT_CFM_FUNCTION GetMoviePreviewMode
  696.     ENDIF
  697.  
  698. ;
  699. ; pascal void SetMoviePreviewMode(Movie theMovie, Boolean usePreview)
  700. ;
  701.     IF ¬ GENERATINGCFM THEN
  702.         Macro
  703.         _SetMoviePreviewMode
  704.             moveq               #16,D0
  705.             dc.w                $AAAA
  706.         EndM
  707.     ELSE
  708.         IMPORT_CFM_FUNCTION SetMoviePreviewMode
  709.     ENDIF
  710.  
  711. ;
  712. ; pascal void ShowMoviePoster(Movie theMovie)
  713. ;
  714.     IF ¬ GENERATINGCFM THEN
  715.         Macro
  716.         _ShowMoviePoster
  717.             moveq               #17,D0
  718.             dc.w                $AAAA
  719.         EndM
  720.     ELSE
  721.         IMPORT_CFM_FUNCTION ShowMoviePoster
  722.     ENDIF
  723.  
  724. ;
  725. ; pascal void PlayMoviePreview(Movie theMovie, MoviePreviewCallOutUPP callOutProc, long refcon)
  726. ;
  727.     IF ¬ GENERATINGCFM THEN
  728.         Macro
  729.         _PlayMoviePreview
  730.             move.w              #$00F2,D0
  731.             dc.w                $AAAA
  732.         EndM
  733.     ELSE
  734.         IMPORT_CFM_FUNCTION PlayMoviePreview
  735.     ENDIF
  736.  
  737. ;
  738. ;************************
  739. ;* calls for controlling movies & tracks which are playing
  740. ;*************************
  741. ;
  742. ;
  743. ; pascal TimeBase GetMovieTimeBase(Movie theMovie)
  744. ;
  745.     IF ¬ GENERATINGCFM THEN
  746.         Macro
  747.         _GetMovieTimeBase
  748.             moveq               #18,D0
  749.             dc.w                $AAAA
  750.         EndM
  751.     ELSE
  752.         IMPORT_CFM_FUNCTION GetMovieTimeBase
  753.     ENDIF
  754.  
  755. ;
  756. ; pascal void SetMovieMasterTimeBase(Movie theMovie, TimeBase tb, const TimeRecord *slaveZero)
  757. ;
  758.     IF ¬ GENERATINGCFM THEN
  759.         Macro
  760.         _SetMovieMasterTimeBase
  761.             move.w              #$0167,D0
  762.             dc.w                $AAAA
  763.         EndM
  764.     ELSE
  765.         IMPORT_CFM_FUNCTION SetMovieMasterTimeBase
  766.     ENDIF
  767.  
  768. ;
  769. ; pascal void SetMovieMasterClock(Movie theMovie, Component clockMeister, const TimeRecord *slaveZero)
  770. ;
  771.     IF ¬ GENERATINGCFM THEN
  772.         Macro
  773.         _SetMovieMasterClock
  774.             move.w              #$0168,D0
  775.             dc.w                $AAAA
  776.         EndM
  777.     ELSE
  778.         IMPORT_CFM_FUNCTION SetMovieMasterClock
  779.     ENDIF
  780.  
  781. ;
  782. ; pascal void GetMovieGWorld(Movie theMovie, CGrafPtr *port, GDHandle *gdh)
  783. ;
  784.     IF ¬ GENERATINGCFM THEN
  785.         Macro
  786.         _GetMovieGWorld
  787.             moveq               #21,D0
  788.             dc.w                $AAAA
  789.         EndM
  790.     ELSE
  791.         IMPORT_CFM_FUNCTION GetMovieGWorld
  792.     ENDIF
  793.  
  794. ;
  795. ; pascal void SetMovieGWorld(Movie theMovie, CGrafPtr port, GDHandle gdh)
  796. ;
  797.     IF ¬ GENERATINGCFM THEN
  798.         Macro
  799.         _SetMovieGWorld
  800.             moveq               #22,D0
  801.             dc.w                $AAAA
  802.         EndM
  803.     ELSE
  804.         IMPORT_CFM_FUNCTION SetMovieGWorld
  805.     ENDIF
  806.  
  807.  
  808. movieDrawingCallWhenChanged        EQU        0
  809. movieDrawingCallAlways            EQU        1
  810. ;
  811. ; pascal void SetMovieDrawingCompleteProc(Movie theMovie, long flags, MovieDrawingCompleteUPP proc, long refCon)
  812. ;
  813.     IF ¬ GENERATINGCFM THEN
  814.         Macro
  815.         _SetMovieDrawingCompleteProc
  816.             move.w              #$01DE,D0
  817.             dc.w                $AAAA
  818.         EndM
  819.     ELSE
  820.         IMPORT_CFM_FUNCTION SetMovieDrawingCompleteProc
  821.     ENDIF
  822.  
  823. ;
  824. ; pascal Track GetNextTrackForCompositing(Movie theMovie, Track theTrack)
  825. ;
  826.     IF ¬ GENERATINGCFM THEN
  827.         Macro
  828.         _GetNextTrackForCompositing
  829.             move.w              #$01FA,D0
  830.             dc.w                $AAAA
  831.         EndM
  832.     ELSE
  833.         IMPORT_CFM_FUNCTION GetNextTrackForCompositing
  834.     ENDIF
  835.  
  836. ;
  837. ; pascal Track GetPrevTrackForCompositing(Movie theMovie, Track theTrack)
  838. ;
  839.     IF ¬ GENERATINGCFM THEN
  840.         Macro
  841.         _GetPrevTrackForCompositing
  842.             move.w              #$01FB,D0
  843.             dc.w                $AAAA
  844.         EndM
  845.     ELSE
  846.         IMPORT_CFM_FUNCTION GetPrevTrackForCompositing
  847.     ENDIF
  848.  
  849. ;
  850. ; pascal void SetTrackGWorld(Track theTrack, CGrafPtr port, GDHandle gdh, TrackTransferUPP proc, long refCon)
  851. ;
  852.     IF ¬ GENERATINGCFM THEN
  853.         Macro
  854.         _SetTrackGWorld
  855.             move.w              #$009D,D0
  856.             dc.w                $AAAA
  857.         EndM
  858.     ELSE
  859.         IMPORT_CFM_FUNCTION SetTrackGWorld
  860.     ENDIF
  861.  
  862. ;
  863. ; pascal PicHandle GetMoviePict(Movie theMovie, TimeValue time)
  864. ;
  865.     IF ¬ GENERATINGCFM THEN
  866.         Macro
  867.         _GetMoviePict
  868.             moveq               #29,D0
  869.             dc.w                $AAAA
  870.         EndM
  871.     ELSE
  872.         IMPORT_CFM_FUNCTION GetMoviePict
  873.     ENDIF
  874.  
  875. ;
  876. ; pascal PicHandle GetTrackPict(Track theTrack, TimeValue time)
  877. ;
  878.     IF ¬ GENERATINGCFM THEN
  879.         Macro
  880.         _GetTrackPict
  881.             moveq               #30,D0
  882.             dc.w                $AAAA
  883.         EndM
  884.     ELSE
  885.         IMPORT_CFM_FUNCTION GetTrackPict
  886.     ENDIF
  887.  
  888. ;
  889. ; pascal PicHandle GetMoviePosterPict(Movie theMovie)
  890. ;
  891.     IF ¬ GENERATINGCFM THEN
  892.         Macro
  893.         _GetMoviePosterPict
  894.             move.w              #$00F7,D0
  895.             dc.w                $AAAA
  896.         EndM
  897.     ELSE
  898.         IMPORT_CFM_FUNCTION GetMoviePosterPict
  899.     ENDIF
  900.  
  901. ;  called between Begin & EndUpdate 
  902. ;
  903. ; pascal OSErr UpdateMovie(Movie theMovie)
  904. ;
  905.     IF ¬ GENERATINGCFM THEN
  906.         Macro
  907.         _UpdateMovie
  908.             moveq               #31,D0
  909.             dc.w                $AAAA
  910.         EndM
  911.     ELSE
  912.         IMPORT_CFM_FUNCTION UpdateMovie
  913.     ENDIF
  914.  
  915. ;
  916. ; pascal OSErr InvalidateMovieRegion(Movie theMovie, RgnHandle invalidRgn)
  917. ;
  918.     IF ¬ GENERATINGCFM THEN
  919.         Macro
  920.         _InvalidateMovieRegion
  921.             move.w              #$022A,D0
  922.             dc.w                $AAAA
  923.         EndM
  924.     ELSE
  925.         IMPORT_CFM_FUNCTION InvalidateMovieRegion
  926.     ENDIF
  927.  
  928. ; *** spatial movie routines ***
  929. ;
  930. ; pascal void GetMovieBox(Movie theMovie, Rect *boxRect)
  931. ;
  932.     IF ¬ GENERATINGCFM THEN
  933.         Macro
  934.         _GetMovieBox
  935.             move.w              #$00F9,D0
  936.             dc.w                $AAAA
  937.         EndM
  938.     ELSE
  939.         IMPORT_CFM_FUNCTION GetMovieBox
  940.     ENDIF
  941.  
  942. ;
  943. ; pascal void SetMovieBox(Movie theMovie, const Rect *boxRect)
  944. ;
  945.     IF ¬ GENERATINGCFM THEN
  946.         Macro
  947.         _SetMovieBox
  948.             move.w              #$00FA,D0
  949.             dc.w                $AAAA
  950.         EndM
  951.     ELSE
  952.         IMPORT_CFM_FUNCTION SetMovieBox
  953.     ENDIF
  954.  
  955. ; * movie display clip 
  956. ;
  957. ; pascal RgnHandle GetMovieDisplayClipRgn(Movie theMovie)
  958. ;
  959.     IF ¬ GENERATINGCFM THEN
  960.         Macro
  961.         _GetMovieDisplayClipRgn
  962.             move.w              #$00FC,D0
  963.             dc.w                $AAAA
  964.         EndM
  965.     ELSE
  966.         IMPORT_CFM_FUNCTION GetMovieDisplayClipRgn
  967.     ENDIF
  968.  
  969. ;
  970. ; pascal void SetMovieDisplayClipRgn(Movie theMovie, RgnHandle theClip)
  971. ;
  972.     IF ¬ GENERATINGCFM THEN
  973.         Macro
  974.         _SetMovieDisplayClipRgn
  975.             move.w              #$00FD,D0
  976.             dc.w                $AAAA
  977.         EndM
  978.     ELSE
  979.         IMPORT_CFM_FUNCTION SetMovieDisplayClipRgn
  980.     ENDIF
  981.  
  982. ; * movie src clip 
  983. ;
  984. ; pascal RgnHandle GetMovieClipRgn(Movie theMovie)
  985. ;
  986.     IF ¬ GENERATINGCFM THEN
  987.         Macro
  988.         _GetMovieClipRgn
  989.             move.w              #$0100,D0
  990.             dc.w                $AAAA
  991.         EndM
  992.     ELSE
  993.         IMPORT_CFM_FUNCTION GetMovieClipRgn
  994.     ENDIF
  995.  
  996. ;
  997. ; pascal void SetMovieClipRgn(Movie theMovie, RgnHandle theClip)
  998. ;
  999.     IF ¬ GENERATINGCFM THEN
  1000.         Macro
  1001.         _SetMovieClipRgn
  1002.             move.w              #$0101,D0
  1003.             dc.w                $AAAA
  1004.         EndM
  1005.     ELSE
  1006.         IMPORT_CFM_FUNCTION SetMovieClipRgn
  1007.     ENDIF
  1008.  
  1009. ; * track src clip 
  1010. ;
  1011. ; pascal RgnHandle GetTrackClipRgn(Track theTrack)
  1012. ;
  1013.     IF ¬ GENERATINGCFM THEN
  1014.         Macro
  1015.         _GetTrackClipRgn
  1016.             move.w              #$0102,D0
  1017.             dc.w                $AAAA
  1018.         EndM
  1019.     ELSE
  1020.         IMPORT_CFM_FUNCTION GetTrackClipRgn
  1021.     ENDIF
  1022.  
  1023. ;
  1024. ; pascal void SetTrackClipRgn(Track theTrack, RgnHandle theClip)
  1025. ;
  1026.     IF ¬ GENERATINGCFM THEN
  1027.         Macro
  1028.         _SetTrackClipRgn
  1029.             move.w              #$0103,D0
  1030.             dc.w                $AAAA
  1031.         EndM
  1032.     ELSE
  1033.         IMPORT_CFM_FUNCTION SetTrackClipRgn
  1034.     ENDIF
  1035.  
  1036. ; * bounds in display space (not clipped by display clip) 
  1037. ;
  1038. ; pascal RgnHandle GetMovieDisplayBoundsRgn(Movie theMovie)
  1039. ;
  1040.     IF ¬ GENERATINGCFM THEN
  1041.         Macro
  1042.         _GetMovieDisplayBoundsRgn
  1043.             move.w              #$00FB,D0
  1044.             dc.w                $AAAA
  1045.         EndM
  1046.     ELSE
  1047.         IMPORT_CFM_FUNCTION GetMovieDisplayBoundsRgn
  1048.     ENDIF
  1049.  
  1050. ;
  1051. ; pascal RgnHandle GetTrackDisplayBoundsRgn(Track theTrack)
  1052. ;
  1053.     IF ¬ GENERATINGCFM THEN
  1054.         Macro
  1055.         _GetTrackDisplayBoundsRgn
  1056.             move.w              #$0112,D0
  1057.             dc.w                $AAAA
  1058.         EndM
  1059.     ELSE
  1060.         IMPORT_CFM_FUNCTION GetTrackDisplayBoundsRgn
  1061.     ENDIF
  1062.  
  1063. ; * bounds in movie space 
  1064. ;
  1065. ; pascal RgnHandle GetMovieBoundsRgn(Movie theMovie)
  1066. ;
  1067.     IF ¬ GENERATINGCFM THEN
  1068.         Macro
  1069.         _GetMovieBoundsRgn
  1070.             move.w              #$00FE,D0
  1071.             dc.w                $AAAA
  1072.         EndM
  1073.     ELSE
  1074.         IMPORT_CFM_FUNCTION GetMovieBoundsRgn
  1075.     ENDIF
  1076.  
  1077. ;
  1078. ; pascal RgnHandle GetTrackMovieBoundsRgn(Track theTrack)
  1079. ;
  1080.     IF ¬ GENERATINGCFM THEN
  1081.         Macro
  1082.         _GetTrackMovieBoundsRgn
  1083.             move.w              #$00FF,D0
  1084.             dc.w                $AAAA
  1085.         EndM
  1086.     ELSE
  1087.         IMPORT_CFM_FUNCTION GetTrackMovieBoundsRgn
  1088.     ENDIF
  1089.  
  1090. ; * bounds in track space 
  1091. ;
  1092. ; pascal RgnHandle GetTrackBoundsRgn(Track theTrack)
  1093. ;
  1094.     IF ¬ GENERATINGCFM THEN
  1095.         Macro
  1096.         _GetTrackBoundsRgn
  1097.             move.w              #$0111,D0
  1098.             dc.w                $AAAA
  1099.         EndM
  1100.     ELSE
  1101.         IMPORT_CFM_FUNCTION GetTrackBoundsRgn
  1102.     ENDIF
  1103.  
  1104. ; * mattes - always in track space 
  1105. ;
  1106. ; pascal PixMapHandle GetTrackMatte(Track theTrack)
  1107. ;
  1108.     IF ¬ GENERATINGCFM THEN
  1109.         Macro
  1110.         _GetTrackMatte
  1111.             move.w              #$0115,D0
  1112.             dc.w                $AAAA
  1113.         EndM
  1114.     ELSE
  1115.         IMPORT_CFM_FUNCTION GetTrackMatte
  1116.     ENDIF
  1117.  
  1118. ;
  1119. ; pascal void SetTrackMatte(Track theTrack, PixMapHandle theMatte)
  1120. ;
  1121.     IF ¬ GENERATINGCFM THEN
  1122.         Macro
  1123.         _SetTrackMatte
  1124.             move.w              #$0116,D0
  1125.             dc.w                $AAAA
  1126.         EndM
  1127.     ELSE
  1128.         IMPORT_CFM_FUNCTION SetTrackMatte
  1129.     ENDIF
  1130.  
  1131. ;
  1132. ; pascal void DisposeMatte(PixMapHandle theMatte)
  1133. ;
  1134.     IF ¬ GENERATINGCFM THEN
  1135.         Macro
  1136.         _DisposeMatte
  1137.             move.w              #$014A,D0
  1138.             dc.w                $AAAA
  1139.         EndM
  1140.     ELSE
  1141.         IMPORT_CFM_FUNCTION DisposeMatte
  1142.     ENDIF
  1143.  
  1144. ;
  1145. ;************************
  1146. ;* calls for getting/saving movies
  1147. ;*************************
  1148. ;
  1149. ;
  1150. ; pascal Movie NewMovie(long flags)
  1151. ;
  1152.     IF ¬ GENERATINGCFM THEN
  1153.         Macro
  1154.         _NewMovie
  1155.             move.w              #$0187,D0
  1156.             dc.w                $AAAA
  1157.         EndM
  1158.     ELSE
  1159.         IMPORT_CFM_FUNCTION NewMovie
  1160.     ENDIF
  1161.  
  1162. ;
  1163. ; pascal OSErr PutMovieIntoHandle(Movie theMovie, Handle publicMovie)
  1164. ;
  1165.     IF ¬ GENERATINGCFM THEN
  1166.         Macro
  1167.         _PutMovieIntoHandle
  1168.             moveq               #34,D0
  1169.             dc.w                $AAAA
  1170.         EndM
  1171.     ELSE
  1172.         IMPORT_CFM_FUNCTION PutMovieIntoHandle
  1173.     ENDIF
  1174.  
  1175. ;
  1176. ; pascal OSErr PutMovieIntoDataFork(Movie theMovie, short fRefNum, long offset, long maxSize)
  1177. ;
  1178.     IF ¬ GENERATINGCFM THEN
  1179.         Macro
  1180.         _PutMovieIntoDataFork
  1181.             move.w              #$01B4,D0
  1182.             dc.w                $AAAA
  1183.         EndM
  1184.     ELSE
  1185.         IMPORT_CFM_FUNCTION PutMovieIntoDataFork
  1186.     ENDIF
  1187.  
  1188. ;
  1189. ; pascal void DisposeMovie(Movie theMovie)
  1190. ;
  1191.     IF ¬ GENERATINGCFM THEN
  1192.         Macro
  1193.         _DisposeMovie
  1194.             moveq               #35,D0
  1195.             dc.w                $AAAA
  1196.         EndM
  1197.     ELSE
  1198.         IMPORT_CFM_FUNCTION DisposeMovie
  1199.     ENDIF
  1200.  
  1201. ;
  1202. ;************************
  1203. ;* Movie State Routines
  1204. ;*************************
  1205. ;
  1206. ;
  1207. ; pascal unsigned long GetMovieCreationTime(Movie theMovie)
  1208. ;
  1209.     IF ¬ GENERATINGCFM THEN
  1210.         Macro
  1211.         _GetMovieCreationTime
  1212.             moveq               #38,D0
  1213.             dc.w                $AAAA
  1214.         EndM
  1215.     ELSE
  1216.         IMPORT_CFM_FUNCTION GetMovieCreationTime
  1217.     ENDIF
  1218.  
  1219. ;
  1220. ; pascal unsigned long GetMovieModificationTime(Movie theMovie)
  1221. ;
  1222.     IF ¬ GENERATINGCFM THEN
  1223.         Macro
  1224.         _GetMovieModificationTime
  1225.             moveq               #39,D0
  1226.             dc.w                $AAAA
  1227.         EndM
  1228.     ELSE
  1229.         IMPORT_CFM_FUNCTION GetMovieModificationTime
  1230.     ENDIF
  1231.  
  1232. ;
  1233. ; pascal TimeScale GetMovieTimeScale(Movie theMovie)
  1234. ;
  1235.     IF ¬ GENERATINGCFM THEN
  1236.         Macro
  1237.         _GetMovieTimeScale
  1238.             moveq               #41,D0
  1239.             dc.w                $AAAA
  1240.         EndM
  1241.     ELSE
  1242.         IMPORT_CFM_FUNCTION GetMovieTimeScale
  1243.     ENDIF
  1244.  
  1245. ;
  1246. ; pascal void SetMovieTimeScale(Movie theMovie, TimeScale timeScale)
  1247. ;
  1248.     IF ¬ GENERATINGCFM THEN
  1249.         Macro
  1250.         _SetMovieTimeScale
  1251.             moveq               #42,D0
  1252.             dc.w                $AAAA
  1253.         EndM
  1254.     ELSE
  1255.         IMPORT_CFM_FUNCTION SetMovieTimeScale
  1256.     ENDIF
  1257.  
  1258. ;
  1259. ; pascal TimeValue GetMovieDuration(Movie theMovie)
  1260. ;
  1261.     IF ¬ GENERATINGCFM THEN
  1262.         Macro
  1263.         _GetMovieDuration
  1264.             moveq               #43,D0
  1265.             dc.w                $AAAA
  1266.         EndM
  1267.     ELSE
  1268.         IMPORT_CFM_FUNCTION GetMovieDuration
  1269.     ENDIF
  1270.  
  1271. ;
  1272. ; pascal Fixed GetMovieRate(Movie theMovie)
  1273. ;
  1274.     IF ¬ GENERATINGCFM THEN
  1275.         Macro
  1276.         _GetMovieRate
  1277.             moveq               #44,D0
  1278.             dc.w                $AAAA
  1279.         EndM
  1280.     ELSE
  1281.         IMPORT_CFM_FUNCTION GetMovieRate
  1282.     ENDIF
  1283.  
  1284. ;
  1285. ; pascal void SetMovieRate(Movie theMovie, Fixed rate)
  1286. ;
  1287.     IF ¬ GENERATINGCFM THEN
  1288.         Macro
  1289.         _SetMovieRate
  1290.             moveq               #45,D0
  1291.             dc.w                $AAAA
  1292.         EndM
  1293.     ELSE
  1294.         IMPORT_CFM_FUNCTION SetMovieRate
  1295.     ENDIF
  1296.  
  1297. ;
  1298. ; pascal Fixed GetMoviePreferredRate(Movie theMovie)
  1299. ;
  1300.     IF ¬ GENERATINGCFM THEN
  1301.         Macro
  1302.         _GetMoviePreferredRate
  1303.             move.w              #$00F3,D0
  1304.             dc.w                $AAAA
  1305.         EndM
  1306.     ELSE
  1307.         IMPORT_CFM_FUNCTION GetMoviePreferredRate
  1308.     ENDIF
  1309.  
  1310. ;
  1311. ; pascal void SetMoviePreferredRate(Movie theMovie, Fixed rate)
  1312. ;
  1313.     IF ¬ GENERATINGCFM THEN
  1314.         Macro
  1315.         _SetMoviePreferredRate
  1316.             move.w              #$00F4,D0
  1317.             dc.w                $AAAA
  1318.         EndM
  1319.     ELSE
  1320.         IMPORT_CFM_FUNCTION SetMoviePreferredRate
  1321.     ENDIF
  1322.  
  1323. ;
  1324. ; pascal short GetMoviePreferredVolume(Movie theMovie)
  1325. ;
  1326.     IF ¬ GENERATINGCFM THEN
  1327.         Macro
  1328.         _GetMoviePreferredVolume
  1329.             move.w              #$00F5,D0
  1330.             dc.w                $AAAA
  1331.         EndM
  1332.     ELSE
  1333.         IMPORT_CFM_FUNCTION GetMoviePreferredVolume
  1334.     ENDIF
  1335.  
  1336. ;
  1337. ; pascal void SetMoviePreferredVolume(Movie theMovie, short volume)
  1338. ;
  1339.     IF ¬ GENERATINGCFM THEN
  1340.         Macro
  1341.         _SetMoviePreferredVolume
  1342.             move.w              #$00F6,D0
  1343.             dc.w                $AAAA
  1344.         EndM
  1345.     ELSE
  1346.         IMPORT_CFM_FUNCTION SetMoviePreferredVolume
  1347.     ENDIF
  1348.  
  1349. ;
  1350. ; pascal short GetMovieVolume(Movie theMovie)
  1351. ;
  1352.     IF ¬ GENERATINGCFM THEN
  1353.         Macro
  1354.         _GetMovieVolume
  1355.             moveq               #46,D0
  1356.             dc.w                $AAAA
  1357.         EndM
  1358.     ELSE
  1359.         IMPORT_CFM_FUNCTION GetMovieVolume
  1360.     ENDIF
  1361.  
  1362. ;
  1363. ; pascal void SetMovieVolume(Movie theMovie, short volume)
  1364. ;
  1365.     IF ¬ GENERATINGCFM THEN
  1366.         Macro
  1367.         _SetMovieVolume
  1368.             moveq               #47,D0
  1369.             dc.w                $AAAA
  1370.         EndM
  1371.     ELSE
  1372.         IMPORT_CFM_FUNCTION SetMovieVolume
  1373.     ENDIF
  1374.  
  1375. ;
  1376. ; pascal void GetMovieMatrix(Movie theMovie, MatrixRecord *matrix)
  1377. ;
  1378.     IF ¬ GENERATINGCFM THEN
  1379.         Macro
  1380.         _GetMovieMatrix
  1381.             moveq               #49,D0
  1382.             dc.w                $AAAA
  1383.         EndM
  1384.     ELSE
  1385.         IMPORT_CFM_FUNCTION GetMovieMatrix
  1386.     ENDIF
  1387.  
  1388. ;
  1389. ; pascal void SetMovieMatrix(Movie theMovie, const MatrixRecord *matrix)
  1390. ;
  1391.     IF ¬ GENERATINGCFM THEN
  1392.         Macro
  1393.         _SetMovieMatrix
  1394.             moveq               #50,D0
  1395.             dc.w                $AAAA
  1396.         EndM
  1397.     ELSE
  1398.         IMPORT_CFM_FUNCTION SetMovieMatrix
  1399.     ENDIF
  1400.  
  1401. ;
  1402. ; pascal void GetMoviePreviewTime(Movie theMovie, TimeValue *previewTime, TimeValue *previewDuration)
  1403. ;
  1404.     IF ¬ GENERATINGCFM THEN
  1405.         Macro
  1406.         _GetMoviePreviewTime
  1407.             moveq               #51,D0
  1408.             dc.w                $AAAA
  1409.         EndM
  1410.     ELSE
  1411.         IMPORT_CFM_FUNCTION GetMoviePreviewTime
  1412.     ENDIF
  1413.  
  1414. ;
  1415. ; pascal void SetMoviePreviewTime(Movie theMovie, TimeValue previewTime, TimeValue previewDuration)
  1416. ;
  1417.     IF ¬ GENERATINGCFM THEN
  1418.         Macro
  1419.         _SetMoviePreviewTime
  1420.             moveq               #52,D0
  1421.             dc.w                $AAAA
  1422.         EndM
  1423.     ELSE
  1424.         IMPORT_CFM_FUNCTION SetMoviePreviewTime
  1425.     ENDIF
  1426.  
  1427. ;
  1428. ; pascal TimeValue GetMoviePosterTime(Movie theMovie)
  1429. ;
  1430.     IF ¬ GENERATINGCFM THEN
  1431.         Macro
  1432.         _GetMoviePosterTime
  1433.             moveq               #53,D0
  1434.             dc.w                $AAAA
  1435.         EndM
  1436.     ELSE
  1437.         IMPORT_CFM_FUNCTION GetMoviePosterTime
  1438.     ENDIF
  1439.  
  1440. ;
  1441. ; pascal void SetMoviePosterTime(Movie theMovie, TimeValue posterTime)
  1442. ;
  1443.     IF ¬ GENERATINGCFM THEN
  1444.         Macro
  1445.         _SetMoviePosterTime
  1446.             moveq               #54,D0
  1447.             dc.w                $AAAA
  1448.         EndM
  1449.     ELSE
  1450.         IMPORT_CFM_FUNCTION SetMoviePosterTime
  1451.     ENDIF
  1452.  
  1453. ;
  1454. ; pascal void GetMovieSelection(Movie theMovie, TimeValue *selectionTime, TimeValue *selectionDuration)
  1455. ;
  1456.     IF ¬ GENERATINGCFM THEN
  1457.         Macro
  1458.         _GetMovieSelection
  1459.             moveq               #55,D0
  1460.             dc.w                $AAAA
  1461.         EndM
  1462.     ELSE
  1463.         IMPORT_CFM_FUNCTION GetMovieSelection
  1464.     ENDIF
  1465.  
  1466. ;
  1467. ; pascal void SetMovieSelection(Movie theMovie, TimeValue selectionTime, TimeValue selectionDuration)
  1468. ;
  1469.     IF ¬ GENERATINGCFM THEN
  1470.         Macro
  1471.         _SetMovieSelection
  1472.             moveq               #56,D0
  1473.             dc.w                $AAAA
  1474.         EndM
  1475.     ELSE
  1476.         IMPORT_CFM_FUNCTION SetMovieSelection
  1477.     ENDIF
  1478.  
  1479. ;
  1480. ; pascal void SetMovieActiveSegment(Movie theMovie, TimeValue startTime, TimeValue duration)
  1481. ;
  1482.     IF ¬ GENERATINGCFM THEN
  1483.         Macro
  1484.         _SetMovieActiveSegment
  1485.             move.w              #$015C,D0
  1486.             dc.w                $AAAA
  1487.         EndM
  1488.     ELSE
  1489.         IMPORT_CFM_FUNCTION SetMovieActiveSegment
  1490.     ENDIF
  1491.  
  1492. ;
  1493. ; pascal void GetMovieActiveSegment(Movie theMovie, TimeValue *startTime, TimeValue *duration)
  1494. ;
  1495.     IF ¬ GENERATINGCFM THEN
  1496.         Macro
  1497.         _GetMovieActiveSegment
  1498.             move.w              #$015D,D0
  1499.             dc.w                $AAAA
  1500.         EndM
  1501.     ELSE
  1502.         IMPORT_CFM_FUNCTION GetMovieActiveSegment
  1503.     ENDIF
  1504.  
  1505. ;
  1506. ; pascal TimeValue GetMovieTime(Movie theMovie, TimeRecord *currentTime)
  1507. ;
  1508.     IF ¬ GENERATINGCFM THEN
  1509.         Macro
  1510.         _GetMovieTime
  1511.             moveq               #57,D0
  1512.             dc.w                $AAAA
  1513.         EndM
  1514.     ELSE
  1515.         IMPORT_CFM_FUNCTION GetMovieTime
  1516.     ENDIF
  1517.  
  1518. ;
  1519. ; pascal void SetMovieTime(Movie theMovie, const TimeRecord *newtime)
  1520. ;
  1521.     IF ¬ GENERATINGCFM THEN
  1522.         Macro
  1523.         _SetMovieTime
  1524.             moveq               #60,D0
  1525.             dc.w                $AAAA
  1526.         EndM
  1527.     ELSE
  1528.         IMPORT_CFM_FUNCTION SetMovieTime
  1529.     ENDIF
  1530.  
  1531. ;
  1532. ; pascal void SetMovieTimeValue(Movie theMovie, TimeValue newtime)
  1533. ;
  1534.     IF ¬ GENERATINGCFM THEN
  1535.         Macro
  1536.         _SetMovieTimeValue
  1537.             moveq               #61,D0
  1538.             dc.w                $AAAA
  1539.         EndM
  1540.     ELSE
  1541.         IMPORT_CFM_FUNCTION SetMovieTimeValue
  1542.     ENDIF
  1543.  
  1544. ;
  1545. ; pascal UserData GetMovieUserData(Movie theMovie)
  1546. ;
  1547.     IF ¬ GENERATINGCFM THEN
  1548.         Macro
  1549.         _GetMovieUserData
  1550.             moveq               #62,D0
  1551.             dc.w                $AAAA
  1552.         EndM
  1553.     ELSE
  1554.         IMPORT_CFM_FUNCTION GetMovieUserData
  1555.     ENDIF
  1556.  
  1557. ;
  1558. ;************************
  1559. ;* Track/Media finding routines
  1560. ;*************************
  1561. ;
  1562. ;
  1563. ; pascal long GetMovieTrackCount(Movie theMovie)
  1564. ;
  1565.     IF ¬ GENERATINGCFM THEN
  1566.         Macro
  1567.         _GetMovieTrackCount
  1568.             moveq               #63,D0
  1569.             dc.w                $AAAA
  1570.         EndM
  1571.     ELSE
  1572.         IMPORT_CFM_FUNCTION GetMovieTrackCount
  1573.     ENDIF
  1574.  
  1575. ;
  1576. ; pascal Track GetMovieTrack(Movie theMovie, long trackID)
  1577. ;
  1578.     IF ¬ GENERATINGCFM THEN
  1579.         Macro
  1580.         _GetMovieTrack
  1581.             moveq               #64,D0
  1582.             dc.w                $AAAA
  1583.         EndM
  1584.     ELSE
  1585.         IMPORT_CFM_FUNCTION GetMovieTrack
  1586.     ENDIF
  1587.  
  1588. ;
  1589. ; pascal Track GetMovieIndTrack(Movie theMovie, long index)
  1590. ;
  1591.     IF ¬ GENERATINGCFM THEN
  1592.         Macro
  1593.         _GetMovieIndTrack
  1594.             move.w              #$0117,D0
  1595.             dc.w                $AAAA
  1596.         EndM
  1597.     ELSE
  1598.         IMPORT_CFM_FUNCTION GetMovieIndTrack
  1599.     ENDIF
  1600.  
  1601. ;
  1602. ; pascal Track GetMovieIndTrackType(Movie theMovie, long index, OSType trackType, long flags)
  1603. ;
  1604.     IF ¬ GENERATINGCFM THEN
  1605.         Macro
  1606.         _GetMovieIndTrackType
  1607.             move.w              #$0208,D0
  1608.             dc.w                $AAAA
  1609.         EndM
  1610.     ELSE
  1611.         IMPORT_CFM_FUNCTION GetMovieIndTrackType
  1612.     ENDIF
  1613.  
  1614. ;
  1615. ; pascal long GetTrackID(Track theTrack)
  1616. ;
  1617.     IF ¬ GENERATINGCFM THEN
  1618.         Macro
  1619.         _GetTrackID
  1620.             move.w              #$0127,D0
  1621.             dc.w                $AAAA
  1622.         EndM
  1623.     ELSE
  1624.         IMPORT_CFM_FUNCTION GetTrackID
  1625.     ENDIF
  1626.  
  1627. ;
  1628. ; pascal Movie GetTrackMovie(Track theTrack)
  1629. ;
  1630.     IF ¬ GENERATINGCFM THEN
  1631.         Macro
  1632.         _GetTrackMovie
  1633.             move.w              #$00D0,D0
  1634.             dc.w                $AAAA
  1635.         EndM
  1636.     ELSE
  1637.         IMPORT_CFM_FUNCTION GetTrackMovie
  1638.     ENDIF
  1639.  
  1640. ;
  1641. ;************************
  1642. ;* Track creation routines
  1643. ;*************************
  1644. ;
  1645. ;
  1646. ; pascal Track NewMovieTrack(Movie theMovie, Fixed width, Fixed height, short trackVolume)
  1647. ;
  1648.     IF ¬ GENERATINGCFM THEN
  1649.         Macro
  1650.         _NewMovieTrack
  1651.             move.w              #$0188,D0
  1652.             dc.w                $AAAA
  1653.         EndM
  1654.     ELSE
  1655.         IMPORT_CFM_FUNCTION NewMovieTrack
  1656.     ENDIF
  1657.  
  1658. ;
  1659. ; pascal void DisposeMovieTrack(Track theTrack)
  1660. ;
  1661.     IF ¬ GENERATINGCFM THEN
  1662.         Macro
  1663.         _DisposeMovieTrack
  1664.             moveq               #66,D0
  1665.             dc.w                $AAAA
  1666.         EndM
  1667.     ELSE
  1668.         IMPORT_CFM_FUNCTION DisposeMovieTrack
  1669.     ENDIF
  1670.  
  1671. ;
  1672. ;************************
  1673. ;* Track State routines
  1674. ;*************************
  1675. ;
  1676. ;
  1677. ; pascal unsigned long GetTrackCreationTime(Track theTrack)
  1678. ;
  1679.     IF ¬ GENERATINGCFM THEN
  1680.         Macro
  1681.         _GetTrackCreationTime
  1682.             moveq               #67,D0
  1683.             dc.w                $AAAA
  1684.         EndM
  1685.     ELSE
  1686.         IMPORT_CFM_FUNCTION GetTrackCreationTime
  1687.     ENDIF
  1688.  
  1689. ;
  1690. ; pascal unsigned long GetTrackModificationTime(Track theTrack)
  1691. ;
  1692.     IF ¬ GENERATINGCFM THEN
  1693.         Macro
  1694.         _GetTrackModificationTime
  1695.             moveq               #68,D0
  1696.             dc.w                $AAAA
  1697.         EndM
  1698.     ELSE
  1699.         IMPORT_CFM_FUNCTION GetTrackModificationTime
  1700.     ENDIF
  1701.  
  1702. ;
  1703. ; pascal Boolean GetTrackEnabled(Track theTrack)
  1704. ;
  1705.     IF ¬ GENERATINGCFM THEN
  1706.         Macro
  1707.         _GetTrackEnabled
  1708.             moveq               #69,D0
  1709.             dc.w                $AAAA
  1710.         EndM
  1711.     ELSE
  1712.         IMPORT_CFM_FUNCTION GetTrackEnabled
  1713.     ENDIF
  1714.  
  1715. ;
  1716. ; pascal void SetTrackEnabled(Track theTrack, Boolean isEnabled)
  1717. ;
  1718.     IF ¬ GENERATINGCFM THEN
  1719.         Macro
  1720.         _SetTrackEnabled
  1721.             moveq               #70,D0
  1722.             dc.w                $AAAA
  1723.         EndM
  1724.     ELSE
  1725.         IMPORT_CFM_FUNCTION SetTrackEnabled
  1726.     ENDIF
  1727.  
  1728. ;
  1729. ; pascal long GetTrackUsage(Track theTrack)
  1730. ;
  1731.     IF ¬ GENERATINGCFM THEN
  1732.         Macro
  1733.         _GetTrackUsage
  1734.             moveq               #71,D0
  1735.             dc.w                $AAAA
  1736.         EndM
  1737.     ELSE
  1738.         IMPORT_CFM_FUNCTION GetTrackUsage
  1739.     ENDIF
  1740.  
  1741. ;
  1742. ; pascal void SetTrackUsage(Track theTrack, long usage)
  1743. ;
  1744.     IF ¬ GENERATINGCFM THEN
  1745.         Macro
  1746.         _SetTrackUsage
  1747.             moveq               #72,D0
  1748.             dc.w                $AAAA
  1749.         EndM
  1750.     ELSE
  1751.         IMPORT_CFM_FUNCTION SetTrackUsage
  1752.     ENDIF
  1753.  
  1754. ;
  1755. ; pascal TimeValue GetTrackDuration(Track theTrack)
  1756. ;
  1757.     IF ¬ GENERATINGCFM THEN
  1758.         Macro
  1759.         _GetTrackDuration
  1760.             moveq               #75,D0
  1761.             dc.w                $AAAA
  1762.         EndM
  1763.     ELSE
  1764.         IMPORT_CFM_FUNCTION GetTrackDuration
  1765.     ENDIF
  1766.  
  1767. ;
  1768. ; pascal TimeValue GetTrackOffset(Track theTrack)
  1769. ;
  1770.     IF ¬ GENERATINGCFM THEN
  1771.         Macro
  1772.         _GetTrackOffset
  1773.             moveq               #76,D0
  1774.             dc.w                $AAAA
  1775.         EndM
  1776.     ELSE
  1777.         IMPORT_CFM_FUNCTION GetTrackOffset
  1778.     ENDIF
  1779.  
  1780. ;
  1781. ; pascal void SetTrackOffset(Track theTrack, TimeValue movieOffsetTime)
  1782. ;
  1783.     IF ¬ GENERATINGCFM THEN
  1784.         Macro
  1785.         _SetTrackOffset
  1786.             moveq               #77,D0
  1787.             dc.w                $AAAA
  1788.         EndM
  1789.     ELSE
  1790.         IMPORT_CFM_FUNCTION SetTrackOffset
  1791.     ENDIF
  1792.  
  1793. ;
  1794. ; pascal short GetTrackLayer(Track theTrack)
  1795. ;
  1796.     IF ¬ GENERATINGCFM THEN
  1797.         Macro
  1798.         _GetTrackLayer
  1799.             moveq               #80,D0
  1800.             dc.w                $AAAA
  1801.         EndM
  1802.     ELSE
  1803.         IMPORT_CFM_FUNCTION GetTrackLayer
  1804.     ENDIF
  1805.  
  1806. ;
  1807. ; pascal void SetTrackLayer(Track theTrack, short layer)
  1808. ;
  1809.     IF ¬ GENERATINGCFM THEN
  1810.         Macro
  1811.         _SetTrackLayer
  1812.             moveq               #81,D0
  1813.             dc.w                $AAAA
  1814.         EndM
  1815.     ELSE
  1816.         IMPORT_CFM_FUNCTION SetTrackLayer
  1817.     ENDIF
  1818.  
  1819. ;
  1820. ; pascal Track GetTrackAlternate(Track theTrack)
  1821. ;
  1822.     IF ¬ GENERATINGCFM THEN
  1823.         Macro
  1824.         _GetTrackAlternate
  1825.             moveq               #82,D0
  1826.             dc.w                $AAAA
  1827.         EndM
  1828.     ELSE
  1829.         IMPORT_CFM_FUNCTION GetTrackAlternate
  1830.     ENDIF
  1831.  
  1832. ;
  1833. ; pascal void SetTrackAlternate(Track theTrack, Track alternateT)
  1834. ;
  1835.     IF ¬ GENERATINGCFM THEN
  1836.         Macro
  1837.         _SetTrackAlternate
  1838.             moveq               #83,D0
  1839.             dc.w                $AAAA
  1840.         EndM
  1841.     ELSE
  1842.         IMPORT_CFM_FUNCTION SetTrackAlternate
  1843.     ENDIF
  1844.  
  1845. ;
  1846. ; pascal void SetAutoTrackAlternatesEnabled(Movie theMovie, Boolean enable)
  1847. ;
  1848.     IF ¬ GENERATINGCFM THEN
  1849.         Macro
  1850.         _SetAutoTrackAlternatesEnabled
  1851.             move.w              #$015E,D0
  1852.             dc.w                $AAAA
  1853.         EndM
  1854.     ELSE
  1855.         IMPORT_CFM_FUNCTION SetAutoTrackAlternatesEnabled
  1856.     ENDIF
  1857.  
  1858. ;
  1859. ; pascal void SelectMovieAlternates(Movie theMovie)
  1860. ;
  1861.     IF ¬ GENERATINGCFM THEN
  1862.         Macro
  1863.         _SelectMovieAlternates
  1864.             move.w              #$015F,D0
  1865.             dc.w                $AAAA
  1866.         EndM
  1867.     ELSE
  1868.         IMPORT_CFM_FUNCTION SelectMovieAlternates
  1869.     ENDIF
  1870.  
  1871. ;
  1872. ; pascal short GetTrackVolume(Track theTrack)
  1873. ;
  1874.     IF ¬ GENERATINGCFM THEN
  1875.         Macro
  1876.         _GetTrackVolume
  1877.             moveq               #84,D0
  1878.             dc.w                $AAAA
  1879.         EndM
  1880.     ELSE
  1881.         IMPORT_CFM_FUNCTION GetTrackVolume
  1882.     ENDIF
  1883.  
  1884. ;
  1885. ; pascal void SetTrackVolume(Track theTrack, short volume)
  1886. ;
  1887.     IF ¬ GENERATINGCFM THEN
  1888.         Macro
  1889.         _SetTrackVolume
  1890.             moveq               #85,D0
  1891.             dc.w                $AAAA
  1892.         EndM
  1893.     ELSE
  1894.         IMPORT_CFM_FUNCTION SetTrackVolume
  1895.     ENDIF
  1896.  
  1897. ;
  1898. ; pascal void GetTrackMatrix(Track theTrack, MatrixRecord *matrix)
  1899. ;
  1900.     IF ¬ GENERATINGCFM THEN
  1901.         Macro
  1902.         _GetTrackMatrix
  1903.             moveq               #86,D0
  1904.             dc.w                $AAAA
  1905.         EndM
  1906.     ELSE
  1907.         IMPORT_CFM_FUNCTION GetTrackMatrix
  1908.     ENDIF
  1909.  
  1910. ;
  1911. ; pascal void SetTrackMatrix(Track theTrack, const MatrixRecord *matrix)
  1912. ;
  1913.     IF ¬ GENERATINGCFM THEN
  1914.         Macro
  1915.         _SetTrackMatrix
  1916.             moveq               #87,D0
  1917.             dc.w                $AAAA
  1918.         EndM
  1919.     ELSE
  1920.         IMPORT_CFM_FUNCTION SetTrackMatrix
  1921.     ENDIF
  1922.  
  1923. ;
  1924. ; pascal void GetTrackDimensions(Track theTrack, Fixed *width, Fixed *height)
  1925. ;
  1926.     IF ¬ GENERATINGCFM THEN
  1927.         Macro
  1928.         _GetTrackDimensions
  1929.             moveq               #93,D0
  1930.             dc.w                $AAAA
  1931.         EndM
  1932.     ELSE
  1933.         IMPORT_CFM_FUNCTION GetTrackDimensions
  1934.     ENDIF
  1935.  
  1936. ;
  1937. ; pascal void SetTrackDimensions(Track theTrack, Fixed width, Fixed height)
  1938. ;
  1939.     IF ¬ GENERATINGCFM THEN
  1940.         Macro
  1941.         _SetTrackDimensions
  1942.             moveq               #94,D0
  1943.             dc.w                $AAAA
  1944.         EndM
  1945.     ELSE
  1946.         IMPORT_CFM_FUNCTION SetTrackDimensions
  1947.     ENDIF
  1948.  
  1949. ;
  1950. ; pascal UserData GetTrackUserData(Track theTrack)
  1951. ;
  1952.     IF ¬ GENERATINGCFM THEN
  1953.         Macro
  1954.         _GetTrackUserData
  1955.             moveq               #95,D0
  1956.             dc.w                $AAAA
  1957.         EndM
  1958.     ELSE
  1959.         IMPORT_CFM_FUNCTION GetTrackUserData
  1960.     ENDIF
  1961.  
  1962. ;
  1963. ;************************
  1964. ;* get Media routines
  1965. ;*************************
  1966. ;
  1967. ;
  1968. ; pascal Media NewTrackMedia(Track theTrack, OSType mediaType, TimeScale timeScale, Handle dataRef, OSType dataRefType)
  1969. ;
  1970.     IF ¬ GENERATINGCFM THEN
  1971.         Macro
  1972.         _NewTrackMedia
  1973.             move.w              #$018E,D0
  1974.             dc.w                $AAAA
  1975.         EndM
  1976.     ELSE
  1977.         IMPORT_CFM_FUNCTION NewTrackMedia
  1978.     ENDIF
  1979.  
  1980. ;
  1981. ; pascal void DisposeTrackMedia(Media theMedia)
  1982. ;
  1983.     IF ¬ GENERATINGCFM THEN
  1984.         Macro
  1985.         _DisposeTrackMedia
  1986.             moveq               #97,D0
  1987.             dc.w                $AAAA
  1988.         EndM
  1989.     ELSE
  1990.         IMPORT_CFM_FUNCTION DisposeTrackMedia
  1991.     ENDIF
  1992.  
  1993. ;
  1994. ; pascal Media GetTrackMedia(Track theTrack)
  1995. ;
  1996.     IF ¬ GENERATINGCFM THEN
  1997.         Macro
  1998.         _GetTrackMedia
  1999.             moveq               #98,D0
  2000.             dc.w                $AAAA
  2001.         EndM
  2002.     ELSE
  2003.         IMPORT_CFM_FUNCTION GetTrackMedia
  2004.     ENDIF
  2005.  
  2006. ;
  2007. ; pascal Track GetMediaTrack(Media theMedia)
  2008. ;
  2009.     IF ¬ GENERATINGCFM THEN
  2010.         Macro
  2011.         _GetMediaTrack
  2012.             move.w              #$00C5,D0
  2013.             dc.w                $AAAA
  2014.         EndM
  2015.     ELSE
  2016.         IMPORT_CFM_FUNCTION GetMediaTrack
  2017.     ENDIF
  2018.  
  2019. ;
  2020. ;************************
  2021. ;* Media State routines
  2022. ;*************************
  2023. ;
  2024. ;
  2025. ; pascal unsigned long GetMediaCreationTime(Media theMedia)
  2026. ;
  2027.     IF ¬ GENERATINGCFM THEN
  2028.         Macro
  2029.         _GetMediaCreationTime
  2030.             moveq               #102,D0
  2031.             dc.w                $AAAA
  2032.         EndM
  2033.     ELSE
  2034.         IMPORT_CFM_FUNCTION GetMediaCreationTime
  2035.     ENDIF
  2036.  
  2037. ;
  2038. ; pascal unsigned long GetMediaModificationTime(Media theMedia)
  2039. ;
  2040.     IF ¬ GENERATINGCFM THEN
  2041.         Macro
  2042.         _GetMediaModificationTime
  2043.             moveq               #103,D0
  2044.             dc.w                $AAAA
  2045.         EndM
  2046.     ELSE
  2047.         IMPORT_CFM_FUNCTION GetMediaModificationTime
  2048.     ENDIF
  2049.  
  2050. ;
  2051. ; pascal TimeScale GetMediaTimeScale(Media theMedia)
  2052. ;
  2053.     IF ¬ GENERATINGCFM THEN
  2054.         Macro
  2055.         _GetMediaTimeScale
  2056.             moveq               #104,D0
  2057.             dc.w                $AAAA
  2058.         EndM
  2059.     ELSE
  2060.         IMPORT_CFM_FUNCTION GetMediaTimeScale
  2061.     ENDIF
  2062.  
  2063. ;
  2064. ; pascal void SetMediaTimeScale(Media theMedia, TimeScale timeScale)
  2065. ;
  2066.     IF ¬ GENERATINGCFM THEN
  2067.         Macro
  2068.         _SetMediaTimeScale
  2069.             moveq               #105,D0
  2070.             dc.w                $AAAA
  2071.         EndM
  2072.     ELSE
  2073.         IMPORT_CFM_FUNCTION SetMediaTimeScale
  2074.     ENDIF
  2075.  
  2076. ;
  2077. ; pascal TimeValue GetMediaDuration(Media theMedia)
  2078. ;
  2079.     IF ¬ GENERATINGCFM THEN
  2080.         Macro
  2081.         _GetMediaDuration
  2082.             moveq               #106,D0
  2083.             dc.w                $AAAA
  2084.         EndM
  2085.     ELSE
  2086.         IMPORT_CFM_FUNCTION GetMediaDuration
  2087.     ENDIF
  2088.  
  2089. ;
  2090. ; pascal short GetMediaLanguage(Media theMedia)
  2091. ;
  2092.     IF ¬ GENERATINGCFM THEN
  2093.         Macro
  2094.         _GetMediaLanguage
  2095.             moveq               #107,D0
  2096.             dc.w                $AAAA
  2097.         EndM
  2098.     ELSE
  2099.         IMPORT_CFM_FUNCTION GetMediaLanguage
  2100.     ENDIF
  2101.  
  2102. ;
  2103. ; pascal void SetMediaLanguage(Media theMedia, short language)
  2104. ;
  2105.     IF ¬ GENERATINGCFM THEN
  2106.         Macro
  2107.         _SetMediaLanguage
  2108.             moveq               #108,D0
  2109.             dc.w                $AAAA
  2110.         EndM
  2111.     ELSE
  2112.         IMPORT_CFM_FUNCTION SetMediaLanguage
  2113.     ENDIF
  2114.  
  2115. ;
  2116. ; pascal short GetMediaQuality(Media theMedia)
  2117. ;
  2118.     IF ¬ GENERATINGCFM THEN
  2119.         Macro
  2120.         _GetMediaQuality
  2121.             moveq               #109,D0
  2122.             dc.w                $AAAA
  2123.         EndM
  2124.     ELSE
  2125.         IMPORT_CFM_FUNCTION GetMediaQuality
  2126.     ENDIF
  2127.  
  2128. ;
  2129. ; pascal void SetMediaQuality(Media theMedia, short quality)
  2130. ;
  2131.     IF ¬ GENERATINGCFM THEN
  2132.         Macro
  2133.         _SetMediaQuality
  2134.             moveq               #110,D0
  2135.             dc.w                $AAAA
  2136.         EndM
  2137.     ELSE
  2138.         IMPORT_CFM_FUNCTION SetMediaQuality
  2139.     ENDIF
  2140.  
  2141. ;
  2142. ; pascal void GetMediaHandlerDescription(Media theMedia, OSType *mediaType, Str255 creatorName, OSType *creatorManufacturer)
  2143. ;
  2144.     IF ¬ GENERATINGCFM THEN
  2145.         Macro
  2146.         _GetMediaHandlerDescription
  2147.             moveq               #111,D0
  2148.             dc.w                $AAAA
  2149.         EndM
  2150.     ELSE
  2151.         IMPORT_CFM_FUNCTION GetMediaHandlerDescription
  2152.     ENDIF
  2153.  
  2154. ;
  2155. ; pascal UserData GetMediaUserData(Media theMedia)
  2156. ;
  2157.     IF ¬ GENERATINGCFM THEN
  2158.         Macro
  2159.         _GetMediaUserData
  2160.             moveq               #112,D0
  2161.             dc.w                $AAAA
  2162.         EndM
  2163.     ELSE
  2164.         IMPORT_CFM_FUNCTION GetMediaUserData
  2165.     ENDIF
  2166.  
  2167. ;
  2168. ; pascal OSErr GetMediaInputMap(Media theMedia, QTAtomContainer *inputMap)
  2169. ;
  2170.     IF ¬ GENERATINGCFM THEN
  2171.         Macro
  2172.         _GetMediaInputMap
  2173.             move.w              #$0249,D0
  2174.             dc.w                $AAAA
  2175.         EndM
  2176.     ELSE
  2177.         IMPORT_CFM_FUNCTION GetMediaInputMap
  2178.     ENDIF
  2179.  
  2180. ;
  2181. ; pascal OSErr SetMediaInputMap(Media theMedia, QTAtomContainer inputMap)
  2182. ;
  2183.     IF ¬ GENERATINGCFM THEN
  2184.         Macro
  2185.         _SetMediaInputMap
  2186.             move.w              #$024A,D0
  2187.             dc.w                $AAAA
  2188.         EndM
  2189.     ELSE
  2190.         IMPORT_CFM_FUNCTION SetMediaInputMap
  2191.     ENDIF
  2192.  
  2193. ;
  2194. ;************************
  2195. ;* Media Handler routines
  2196. ;*************************
  2197. ;
  2198. ;
  2199. ; pascal MediaHandler GetMediaHandler(Media theMedia)
  2200. ;
  2201.     IF ¬ GENERATINGCFM THEN
  2202.         Macro
  2203.         _GetMediaHandler
  2204.             moveq               #113,D0
  2205.             dc.w                $AAAA
  2206.         EndM
  2207.     ELSE
  2208.         IMPORT_CFM_FUNCTION GetMediaHandler
  2209.     ENDIF
  2210.  
  2211. ;
  2212. ; pascal OSErr SetMediaHandler(Media theMedia, MediaHandlerComponent mH)
  2213. ;
  2214.     IF ¬ GENERATINGCFM THEN
  2215.         Macro
  2216.         _SetMediaHandler
  2217.             move.w              #$0190,D0
  2218.             dc.w                $AAAA
  2219.         EndM
  2220.     ELSE
  2221.         IMPORT_CFM_FUNCTION SetMediaHandler
  2222.     ENDIF
  2223.  
  2224. ;
  2225. ;************************
  2226. ;* Media's Data routines
  2227. ;*************************
  2228. ;
  2229. ;
  2230. ; pascal OSErr BeginMediaEdits(Media theMedia)
  2231. ;
  2232.     IF ¬ GENERATINGCFM THEN
  2233.         Macro
  2234.         _BeginMediaEdits
  2235.             moveq               #114,D0
  2236.             dc.w                $AAAA
  2237.         EndM
  2238.     ELSE
  2239.         IMPORT_CFM_FUNCTION BeginMediaEdits
  2240.     ENDIF
  2241.  
  2242. ;
  2243. ; pascal OSErr EndMediaEdits(Media theMedia)
  2244. ;
  2245.     IF ¬ GENERATINGCFM THEN
  2246.         Macro
  2247.         _EndMediaEdits
  2248.             moveq               #115,D0
  2249.             dc.w                $AAAA
  2250.         EndM
  2251.     ELSE
  2252.         IMPORT_CFM_FUNCTION EndMediaEdits
  2253.     ENDIF
  2254.  
  2255. ;
  2256. ; pascal OSErr SetMediaDefaultDataRefIndex(Media theMedia, short index)
  2257. ;
  2258.     IF ¬ GENERATINGCFM THEN
  2259.         Macro
  2260.         _SetMediaDefaultDataRefIndex
  2261.             move.w              #$01E0,D0
  2262.             dc.w                $AAAA
  2263.         EndM
  2264.     ELSE
  2265.         IMPORT_CFM_FUNCTION SetMediaDefaultDataRefIndex
  2266.     ENDIF
  2267.  
  2268. ;
  2269. ; pascal void GetMediaDataHandlerDescription(Media theMedia, short index, OSType *dhType, Str255 creatorName, OSType *creatorManufacturer)
  2270. ;
  2271.     IF ¬ GENERATINGCFM THEN
  2272.         Macro
  2273.         _GetMediaDataHandlerDescription
  2274.             move.w              #$019E,D0
  2275.             dc.w                $AAAA
  2276.         EndM
  2277.     ELSE
  2278.         IMPORT_CFM_FUNCTION GetMediaDataHandlerDescription
  2279.     ENDIF
  2280.  
  2281. ;
  2282. ; pascal DataHandler GetMediaDataHandler(Media theMedia, short index)
  2283. ;
  2284.     IF ¬ GENERATINGCFM THEN
  2285.         Macro
  2286.         _GetMediaDataHandler
  2287.             move.w              #$019F,D0
  2288.             dc.w                $AAAA
  2289.         EndM
  2290.     ELSE
  2291.         IMPORT_CFM_FUNCTION GetMediaDataHandler
  2292.     ENDIF
  2293.  
  2294. ;
  2295. ; pascal OSErr SetMediaDataHandler(Media theMedia, short index, DataHandlerComponent dataHandler)
  2296. ;
  2297.     IF ¬ GENERATINGCFM THEN
  2298.         Macro
  2299.         _SetMediaDataHandler
  2300.             move.w              #$01A0,D0
  2301.             dc.w                $AAAA
  2302.         EndM
  2303.     ELSE
  2304.         IMPORT_CFM_FUNCTION SetMediaDataHandler
  2305.     ENDIF
  2306.  
  2307. ;
  2308. ; pascal Component GetDataHandler(Handle dataRef, OSType dataHandlerSubType, long flags)
  2309. ;
  2310.     IF ¬ GENERATINGCFM THEN
  2311.         Macro
  2312.         _GetDataHandler
  2313.             move.w              #$01ED,D0
  2314.             dc.w                $AAAA
  2315.         EndM
  2316.     ELSE
  2317.         IMPORT_CFM_FUNCTION GetDataHandler
  2318.     ENDIF
  2319.  
  2320. ;
  2321. ;************************
  2322. ;* Media Sample Table Routines
  2323. ;*************************
  2324. ;
  2325. ;
  2326. ; pascal long GetMediaSampleDescriptionCount(Media theMedia)
  2327. ;
  2328.     IF ¬ GENERATINGCFM THEN
  2329.         Macro
  2330.         _GetMediaSampleDescriptionCount
  2331.             moveq               #119,D0
  2332.             dc.w                $AAAA
  2333.         EndM
  2334.     ELSE
  2335.         IMPORT_CFM_FUNCTION GetMediaSampleDescriptionCount
  2336.     ENDIF
  2337.  
  2338. ;
  2339. ; pascal void GetMediaSampleDescription(Media theMedia, long index, SampleDescriptionHandle descH)
  2340. ;
  2341.     IF ¬ GENERATINGCFM THEN
  2342.         Macro
  2343.         _GetMediaSampleDescription
  2344.             moveq               #120,D0
  2345.             dc.w                $AAAA
  2346.         EndM
  2347.     ELSE
  2348.         IMPORT_CFM_FUNCTION GetMediaSampleDescription
  2349.     ENDIF
  2350.  
  2351. ;
  2352. ; pascal OSErr SetMediaSampleDescription(Media theMedia, long index, SampleDescriptionHandle descH)
  2353. ;
  2354.     IF ¬ GENERATINGCFM THEN
  2355.         Macro
  2356.         _SetMediaSampleDescription
  2357.             move.w              #$01D0,D0
  2358.             dc.w                $AAAA
  2359.         EndM
  2360.     ELSE
  2361.         IMPORT_CFM_FUNCTION SetMediaSampleDescription
  2362.     ENDIF
  2363.  
  2364. ;
  2365. ; pascal long GetMediaSampleCount(Media theMedia)
  2366. ;
  2367.     IF ¬ GENERATINGCFM THEN
  2368.         Macro
  2369.         _GetMediaSampleCount
  2370.             moveq               #121,D0
  2371.             dc.w                $AAAA
  2372.         EndM
  2373.     ELSE
  2374.         IMPORT_CFM_FUNCTION GetMediaSampleCount
  2375.     ENDIF
  2376.  
  2377. ;
  2378. ; pascal void SampleNumToMediaTime(Media theMedia, long logicalSampleNum, TimeValue *sampleTime, TimeValue *sampleDuration)
  2379. ;
  2380.     IF ¬ GENERATINGCFM THEN
  2381.         Macro
  2382.         _SampleNumToMediaTime
  2383.             moveq               #122,D0
  2384.             dc.w                $AAAA
  2385.         EndM
  2386.     ELSE
  2387.         IMPORT_CFM_FUNCTION SampleNumToMediaTime
  2388.     ENDIF
  2389.  
  2390. ;
  2391. ; pascal void MediaTimeToSampleNum(Media theMedia, TimeValue time, long *sampleNum, TimeValue *sampleTime, TimeValue *sampleDuration)
  2392. ;
  2393.     IF ¬ GENERATINGCFM THEN
  2394.         Macro
  2395.         _MediaTimeToSampleNum
  2396.             moveq               #123,D0
  2397.             dc.w                $AAAA
  2398.         EndM
  2399.     ELSE
  2400.         IMPORT_CFM_FUNCTION MediaTimeToSampleNum
  2401.     ENDIF
  2402.  
  2403. ;
  2404. ; pascal OSErr AddMediaSample(Media theMedia, Handle dataIn, long inOffset, unsigned long size, TimeValue durationPerSample, SampleDescriptionHandle sampleDescriptionH, long numberOfSamples, short sampleFlags, TimeValue *sampleTime)
  2405. ;
  2406.     IF ¬ GENERATINGCFM THEN
  2407.         Macro
  2408.         _AddMediaSample
  2409.             moveq               #124,D0
  2410.             dc.w                $AAAA
  2411.         EndM
  2412.     ELSE
  2413.         IMPORT_CFM_FUNCTION AddMediaSample
  2414.     ENDIF
  2415.  
  2416. ;
  2417. ; pascal OSErr AddMediaSampleReference(Media theMedia, long dataOffset, unsigned long size, TimeValue durationPerSample, SampleDescriptionHandle sampleDescriptionH, long numberOfSamples, short sampleFlags, TimeValue *sampleTime)
  2418. ;
  2419.     IF ¬ GENERATINGCFM THEN
  2420.         Macro
  2421.         _AddMediaSampleReference
  2422.             moveq               #125,D0
  2423.             dc.w                $AAAA
  2424.         EndM
  2425.     ELSE
  2426.         IMPORT_CFM_FUNCTION AddMediaSampleReference
  2427.     ENDIF
  2428.  
  2429. ;
  2430. ; pascal OSErr AddMediaSampleReferences(Media theMedia, SampleDescriptionHandle sampleDescriptionH, long numberOfSamples, SampleReferencePtr sampleRefs, TimeValue *sampleTime)
  2431. ;
  2432.     IF ¬ GENERATINGCFM THEN
  2433.         Macro
  2434.         _AddMediaSampleReferences
  2435.             move.w              #$01F7,D0
  2436.             dc.w                $AAAA
  2437.         EndM
  2438.     ELSE
  2439.         IMPORT_CFM_FUNCTION AddMediaSampleReferences
  2440.     ENDIF
  2441.  
  2442. ;
  2443. ; pascal OSErr GetMediaSample(Media theMedia, Handle dataOut, long maxSizeToGrow, long *size, TimeValue time, TimeValue *sampleTime, TimeValue *durationPerSample, SampleDescriptionHandle sampleDescriptionH, long *sampleDescriptionIndex, long maxNumberOfSamples, long *numberOfSamples, short *sampleFlags)
  2444. ;
  2445.     IF ¬ GENERATINGCFM THEN
  2446.         Macro
  2447.         _GetMediaSample
  2448.             moveq               #126,D0
  2449.             dc.w                $AAAA
  2450.         EndM
  2451.     ELSE
  2452.         IMPORT_CFM_FUNCTION GetMediaSample
  2453.     ENDIF
  2454.  
  2455. ;
  2456. ; pascal OSErr GetMediaSampleReference(Media theMedia, long *dataOffset, long *size, TimeValue time, TimeValue *sampleTime, TimeValue *durationPerSample, SampleDescriptionHandle sampleDescriptionH, long *sampleDescriptionIndex, long maxNumberOfSamples, long *numberOfSamples, short *sampleFlags)
  2457. ;
  2458.     IF ¬ GENERATINGCFM THEN
  2459.         Macro
  2460.         _GetMediaSampleReference
  2461.             moveq               #127,D0
  2462.             dc.w                $AAAA
  2463.         EndM
  2464.     ELSE
  2465.         IMPORT_CFM_FUNCTION GetMediaSampleReference
  2466.     ENDIF
  2467.  
  2468. ;
  2469. ; pascal OSErr GetMediaSampleReferences(Media theMedia, TimeValue time, TimeValue *sampleTime, SampleDescriptionHandle sampleDescriptionH, long *sampleDescriptionIndex, long maxNumberOfEntries, long *actualNumberofEntries, SampleReferencePtr sampleRefs)
  2470. ;
  2471.     IF ¬ GENERATINGCFM THEN
  2472.         Macro
  2473.         _GetMediaSampleReferences
  2474.             move.w              #$0235,D0
  2475.             dc.w                $AAAA
  2476.         EndM
  2477.     ELSE
  2478.         IMPORT_CFM_FUNCTION GetMediaSampleReferences
  2479.     ENDIF
  2480.  
  2481. ;
  2482. ; pascal OSErr SetMediaPreferredChunkSize(Media theMedia, long maxChunkSize)
  2483. ;
  2484.     IF ¬ GENERATINGCFM THEN
  2485.         Macro
  2486.         _SetMediaPreferredChunkSize
  2487.             move.w              #$01F8,D0
  2488.             dc.w                $AAAA
  2489.         EndM
  2490.     ELSE
  2491.         IMPORT_CFM_FUNCTION SetMediaPreferredChunkSize
  2492.     ENDIF
  2493.  
  2494. ;
  2495. ; pascal OSErr GetMediaPreferredChunkSize(Media theMedia, long *maxChunkSize)
  2496. ;
  2497.     IF ¬ GENERATINGCFM THEN
  2498.         Macro
  2499.         _GetMediaPreferredChunkSize
  2500.             move.w              #$01F9,D0
  2501.             dc.w                $AAAA
  2502.         EndM
  2503.     ELSE
  2504.         IMPORT_CFM_FUNCTION GetMediaPreferredChunkSize
  2505.     ENDIF
  2506.  
  2507. ;
  2508. ; pascal OSErr SetMediaShadowSync(Media theMedia, long frameDiffSampleNum, long syncSampleNum)
  2509. ;
  2510.     IF ¬ GENERATINGCFM THEN
  2511.         Macro
  2512.         _SetMediaShadowSync
  2513.             move.w              #$0121,D0
  2514.             dc.w                $AAAA
  2515.         EndM
  2516.     ELSE
  2517.         IMPORT_CFM_FUNCTION SetMediaShadowSync
  2518.     ENDIF
  2519.  
  2520. ;
  2521. ; pascal OSErr GetMediaShadowSync(Media theMedia, long frameDiffSampleNum, long *syncSampleNum)
  2522. ;
  2523.     IF ¬ GENERATINGCFM THEN
  2524.         Macro
  2525.         _GetMediaShadowSync
  2526.             move.w              #$0122,D0
  2527.             dc.w                $AAAA
  2528.         EndM
  2529.     ELSE
  2530.         IMPORT_CFM_FUNCTION GetMediaShadowSync
  2531.     ENDIF
  2532.  
  2533. ;
  2534. ;************************
  2535. ;* Editing Routines
  2536. ;*************************
  2537. ;
  2538. ;
  2539. ; pascal OSErr InsertMediaIntoTrack(Track theTrack, TimeValue trackStart, TimeValue mediaTime, TimeValue mediaDuration, Fixed mediaRate)
  2540. ;
  2541.     IF ¬ GENERATINGCFM THEN
  2542.         Macro
  2543.         _InsertMediaIntoTrack
  2544.             move.w              #$0183,D0
  2545.             dc.w                $AAAA
  2546.         EndM
  2547.     ELSE
  2548.         IMPORT_CFM_FUNCTION InsertMediaIntoTrack
  2549.     ENDIF
  2550.  
  2551. ;
  2552. ; pascal OSErr InsertTrackSegment(Track srcTrack, Track dstTrack, TimeValue srcIn, TimeValue srcDuration, TimeValue dstIn)
  2553. ;
  2554.     IF ¬ GENERATINGCFM THEN
  2555.         Macro
  2556.         _InsertTrackSegment
  2557.             move.w              #$0085,D0
  2558.             dc.w                $AAAA
  2559.         EndM
  2560.     ELSE
  2561.         IMPORT_CFM_FUNCTION InsertTrackSegment
  2562.     ENDIF
  2563.  
  2564. ;
  2565. ; pascal OSErr InsertMovieSegment(Movie srcMovie, Movie dstMovie, TimeValue srcIn, TimeValue srcDuration, TimeValue dstIn)
  2566. ;
  2567.     IF ¬ GENERATINGCFM THEN
  2568.         Macro
  2569.         _InsertMovieSegment
  2570.             move.w              #$0086,D0
  2571.             dc.w                $AAAA
  2572.         EndM
  2573.     ELSE
  2574.         IMPORT_CFM_FUNCTION InsertMovieSegment
  2575.     ENDIF
  2576.  
  2577. ;
  2578. ; pascal OSErr InsertEmptyTrackSegment(Track dstTrack, TimeValue dstIn, TimeValue dstDuration)
  2579. ;
  2580.     IF ¬ GENERATINGCFM THEN
  2581.         Macro
  2582.         _InsertEmptyTrackSegment
  2583.             move.w              #$0087,D0
  2584.             dc.w                $AAAA
  2585.         EndM
  2586.     ELSE
  2587.         IMPORT_CFM_FUNCTION InsertEmptyTrackSegment
  2588.     ENDIF
  2589.  
  2590. ;
  2591. ; pascal OSErr InsertEmptyMovieSegment(Movie dstMovie, TimeValue dstIn, TimeValue dstDuration)
  2592. ;
  2593.     IF ¬ GENERATINGCFM THEN
  2594.         Macro
  2595.         _InsertEmptyMovieSegment
  2596.             move.w              #$0088,D0
  2597.             dc.w                $AAAA
  2598.         EndM
  2599.     ELSE
  2600.         IMPORT_CFM_FUNCTION InsertEmptyMovieSegment
  2601.     ENDIF
  2602.  
  2603. ;
  2604. ; pascal OSErr DeleteTrackSegment(Track theTrack, TimeValue startTime, TimeValue duration)
  2605. ;
  2606.     IF ¬ GENERATINGCFM THEN
  2607.         Macro
  2608.         _DeleteTrackSegment
  2609.             move.w              #$0089,D0
  2610.             dc.w                $AAAA
  2611.         EndM
  2612.     ELSE
  2613.         IMPORT_CFM_FUNCTION DeleteTrackSegment
  2614.     ENDIF
  2615.  
  2616. ;
  2617. ; pascal OSErr DeleteMovieSegment(Movie theMovie, TimeValue startTime, TimeValue duration)
  2618. ;
  2619.     IF ¬ GENERATINGCFM THEN
  2620.         Macro
  2621.         _DeleteMovieSegment
  2622.             move.w              #$008A,D0
  2623.             dc.w                $AAAA
  2624.         EndM
  2625.     ELSE
  2626.         IMPORT_CFM_FUNCTION DeleteMovieSegment
  2627.     ENDIF
  2628.  
  2629. ;
  2630. ; pascal OSErr ScaleTrackSegment(Track theTrack, TimeValue startTime, TimeValue oldDuration, TimeValue newDuration)
  2631. ;
  2632.     IF ¬ GENERATINGCFM THEN
  2633.         Macro
  2634.         _ScaleTrackSegment
  2635.             move.w              #$008B,D0
  2636.             dc.w                $AAAA
  2637.         EndM
  2638.     ELSE
  2639.         IMPORT_CFM_FUNCTION ScaleTrackSegment
  2640.     ENDIF
  2641.  
  2642. ;
  2643. ; pascal OSErr ScaleMovieSegment(Movie theMovie, TimeValue startTime, TimeValue oldDuration, TimeValue newDuration)
  2644. ;
  2645.     IF ¬ GENERATINGCFM THEN
  2646.         Macro
  2647.         _ScaleMovieSegment
  2648.             move.w              #$008C,D0
  2649.             dc.w                $AAAA
  2650.         EndM
  2651.     ELSE
  2652.         IMPORT_CFM_FUNCTION ScaleMovieSegment
  2653.     ENDIF
  2654.  
  2655. ;
  2656. ;************************
  2657. ;* Hi-level Editing Routines
  2658. ;*************************
  2659. ;
  2660. ;
  2661. ; pascal Movie CutMovieSelection(Movie theMovie)
  2662. ;
  2663.     IF ¬ GENERATINGCFM THEN
  2664.         Macro
  2665.         _CutMovieSelection
  2666.             move.w              #$008D,D0
  2667.             dc.w                $AAAA
  2668.         EndM
  2669.     ELSE
  2670.         IMPORT_CFM_FUNCTION CutMovieSelection
  2671.     ENDIF
  2672.  
  2673. ;
  2674. ; pascal Movie CopyMovieSelection(Movie theMovie)
  2675. ;
  2676.     IF ¬ GENERATINGCFM THEN
  2677.         Macro
  2678.         _CopyMovieSelection
  2679.             move.w              #$008E,D0
  2680.             dc.w                $AAAA
  2681.         EndM
  2682.     ELSE
  2683.         IMPORT_CFM_FUNCTION CopyMovieSelection
  2684.     ENDIF
  2685.  
  2686. ;
  2687. ; pascal void PasteMovieSelection(Movie theMovie, Movie src)
  2688. ;
  2689.     IF ¬ GENERATINGCFM THEN
  2690.         Macro
  2691.         _PasteMovieSelection
  2692.             move.w              #$008F,D0
  2693.             dc.w                $AAAA
  2694.         EndM
  2695.     ELSE
  2696.         IMPORT_CFM_FUNCTION PasteMovieSelection
  2697.     ENDIF
  2698.  
  2699. ;
  2700. ; pascal void AddMovieSelection(Movie theMovie, Movie src)
  2701. ;
  2702.     IF ¬ GENERATINGCFM THEN
  2703.         Macro
  2704.         _AddMovieSelection
  2705.             move.w              #$0152,D0
  2706.             dc.w                $AAAA
  2707.         EndM
  2708.     ELSE
  2709.         IMPORT_CFM_FUNCTION AddMovieSelection
  2710.     ENDIF
  2711.  
  2712. ;
  2713. ; pascal void ClearMovieSelection(Movie theMovie)
  2714. ;
  2715.     IF ¬ GENERATINGCFM THEN
  2716.         Macro
  2717.         _ClearMovieSelection
  2718.             move.w              #$00E1,D0
  2719.             dc.w                $AAAA
  2720.         EndM
  2721.     ELSE
  2722.         IMPORT_CFM_FUNCTION ClearMovieSelection
  2723.     ENDIF
  2724.  
  2725. ;
  2726. ; pascal OSErr PasteHandleIntoMovie(Handle h, OSType handleType, Movie theMovie, long flags, ComponentInstance userComp)
  2727. ;
  2728.     IF ¬ GENERATINGCFM THEN
  2729.         Macro
  2730.         _PasteHandleIntoMovie
  2731.             move.w              #$00CB,D0
  2732.             dc.w                $AAAA
  2733.         EndM
  2734.     ELSE
  2735.         IMPORT_CFM_FUNCTION PasteHandleIntoMovie
  2736.     ENDIF
  2737.  
  2738. ;
  2739. ; pascal OSErr PutMovieIntoTypedHandle(Movie theMovie, Track targetTrack, OSType handleType, Handle publicMovie, TimeValue start, TimeValue dur, long flags, ComponentInstance userComp)
  2740. ;
  2741.     IF ¬ GENERATINGCFM THEN
  2742.         Macro
  2743.         _PutMovieIntoTypedHandle
  2744.             move.w              #$01CD,D0
  2745.             dc.w                $AAAA
  2746.         EndM
  2747.     ELSE
  2748.         IMPORT_CFM_FUNCTION PutMovieIntoTypedHandle
  2749.     ENDIF
  2750.  
  2751. ;
  2752. ; pascal Component IsScrapMovie(Track targetTrack)
  2753. ;
  2754.     IF ¬ GENERATINGCFM THEN
  2755.         Macro
  2756.         _IsScrapMovie
  2757.             move.w              #$00CC,D0
  2758.             dc.w                $AAAA
  2759.         EndM
  2760.     ELSE
  2761.         IMPORT_CFM_FUNCTION IsScrapMovie
  2762.     ENDIF
  2763.  
  2764. ;
  2765. ;************************
  2766. ;* Middle-level Editing Routines
  2767. ;*************************
  2768. ;
  2769. ;
  2770. ; pascal OSErr CopyTrackSettings(Track srcTrack, Track dstTrack)
  2771. ;
  2772.     IF ¬ GENERATINGCFM THEN
  2773.         Macro
  2774.         _CopyTrackSettings
  2775.             move.w              #$0153,D0
  2776.             dc.w                $AAAA
  2777.         EndM
  2778.     ELSE
  2779.         IMPORT_CFM_FUNCTION CopyTrackSettings
  2780.     ENDIF
  2781.  
  2782. ;
  2783. ; pascal OSErr CopyMovieSettings(Movie srcMovie, Movie dstMovie)
  2784. ;
  2785.     IF ¬ GENERATINGCFM THEN
  2786.         Macro
  2787.         _CopyMovieSettings
  2788.             move.w              #$0154,D0
  2789.             dc.w                $AAAA
  2790.         EndM
  2791.     ELSE
  2792.         IMPORT_CFM_FUNCTION CopyMovieSettings
  2793.     ENDIF
  2794.  
  2795. ;
  2796. ; pascal OSErr AddEmptyTrackToMovie(Track srcTrack, Movie dstMovie, Handle dataRef, OSType dataRefType, Track *dstTrack)
  2797. ;
  2798.     IF ¬ GENERATINGCFM THEN
  2799.         Macro
  2800.         _AddEmptyTrackToMovie
  2801.             moveq               #116,D0
  2802.             dc.w                $AAAA
  2803.         EndM
  2804.     ELSE
  2805.         IMPORT_CFM_FUNCTION AddEmptyTrackToMovie
  2806.     ENDIF
  2807.  
  2808. ;
  2809. ;************************
  2810. ;* movie & track edit state routines
  2811. ;*************************
  2812. ;
  2813. ;
  2814. ; pascal MovieEditState NewMovieEditState(Movie theMovie)
  2815. ;
  2816.     IF ¬ GENERATINGCFM THEN
  2817.         Macro
  2818.         _NewMovieEditState
  2819.             move.w              #$0104,D0
  2820.             dc.w                $AAAA
  2821.         EndM
  2822.     ELSE
  2823.         IMPORT_CFM_FUNCTION NewMovieEditState
  2824.     ENDIF
  2825.  
  2826. ;
  2827. ; pascal OSErr UseMovieEditState(Movie theMovie, MovieEditState toState)
  2828. ;
  2829.     IF ¬ GENERATINGCFM THEN
  2830.         Macro
  2831.         _UseMovieEditState
  2832.             move.w              #$0105,D0
  2833.             dc.w                $AAAA
  2834.         EndM
  2835.     ELSE
  2836.         IMPORT_CFM_FUNCTION UseMovieEditState
  2837.     ENDIF
  2838.  
  2839. ;
  2840. ; pascal OSErr DisposeMovieEditState(MovieEditState state)
  2841. ;
  2842.     IF ¬ GENERATINGCFM THEN
  2843.         Macro
  2844.         _DisposeMovieEditState
  2845.             move.w              #$0106,D0
  2846.             dc.w                $AAAA
  2847.         EndM
  2848.     ELSE
  2849.         IMPORT_CFM_FUNCTION DisposeMovieEditState
  2850.     ENDIF
  2851.  
  2852. ;
  2853. ; pascal TrackEditState NewTrackEditState(Track theTrack)
  2854. ;
  2855.     IF ¬ GENERATINGCFM THEN
  2856.         Macro
  2857.         _NewTrackEditState
  2858.             move.w              #$0107,D0
  2859.             dc.w                $AAAA
  2860.         EndM
  2861.     ELSE
  2862.         IMPORT_CFM_FUNCTION NewTrackEditState
  2863.     ENDIF
  2864.  
  2865. ;
  2866. ; pascal OSErr UseTrackEditState(Track theTrack, TrackEditState state)
  2867. ;
  2868.     IF ¬ GENERATINGCFM THEN
  2869.         Macro
  2870.         _UseTrackEditState
  2871.             move.w              #$0108,D0
  2872.             dc.w                $AAAA
  2873.         EndM
  2874.     ELSE
  2875.         IMPORT_CFM_FUNCTION UseTrackEditState
  2876.     ENDIF
  2877.  
  2878. ;
  2879. ; pascal OSErr DisposeTrackEditState(TrackEditState state)
  2880. ;
  2881.     IF ¬ GENERATINGCFM THEN
  2882.         Macro
  2883.         _DisposeTrackEditState
  2884.             move.w              #$0109,D0
  2885.             dc.w                $AAAA
  2886.         EndM
  2887.     ELSE
  2888.         IMPORT_CFM_FUNCTION DisposeTrackEditState
  2889.     ENDIF
  2890.  
  2891. ;
  2892. ;************************
  2893. ;* track reference routines
  2894. ;*************************
  2895. ;
  2896. ;
  2897. ; pascal OSErr AddTrackReference(Track theTrack, Track refTrack, OSType refType, long *addedIndex)
  2898. ;
  2899.     IF ¬ GENERATINGCFM THEN
  2900.         Macro
  2901.         _AddTrackReference
  2902.             move.w              #$01F0,D0
  2903.             dc.w                $AAAA
  2904.         EndM
  2905.     ELSE
  2906.         IMPORT_CFM_FUNCTION AddTrackReference
  2907.     ENDIF
  2908.  
  2909. ;
  2910. ; pascal OSErr DeleteTrackReference(Track theTrack, OSType refType, long index)
  2911. ;
  2912.     IF ¬ GENERATINGCFM THEN
  2913.         Macro
  2914.         _DeleteTrackReference
  2915.             move.w              #$01F1,D0
  2916.             dc.w                $AAAA
  2917.         EndM
  2918.     ELSE
  2919.         IMPORT_CFM_FUNCTION DeleteTrackReference
  2920.     ENDIF
  2921.  
  2922. ;
  2923. ; pascal OSErr SetTrackReference(Track theTrack, Track refTrack, OSType refType, long index)
  2924. ;
  2925.     IF ¬ GENERATINGCFM THEN
  2926.         Macro
  2927.         _SetTrackReference
  2928.             move.w              #$01F2,D0
  2929.             dc.w                $AAAA
  2930.         EndM
  2931.     ELSE
  2932.         IMPORT_CFM_FUNCTION SetTrackReference
  2933.     ENDIF
  2934.  
  2935. ;
  2936. ; pascal Track GetTrackReference(Track theTrack, OSType refType, long index)
  2937. ;
  2938.     IF ¬ GENERATINGCFM THEN
  2939.         Macro
  2940.         _GetTrackReference
  2941.             move.w              #$01F3,D0
  2942.             dc.w                $AAAA
  2943.         EndM
  2944.     ELSE
  2945.         IMPORT_CFM_FUNCTION GetTrackReference
  2946.     ENDIF
  2947.  
  2948. ;
  2949. ; pascal OSType GetNextTrackReferenceType(Track theTrack, OSType refType)
  2950. ;
  2951.     IF ¬ GENERATINGCFM THEN
  2952.         Macro
  2953.         _GetNextTrackReferenceType
  2954.             move.w              #$01F4,D0
  2955.             dc.w                $AAAA
  2956.         EndM
  2957.     ELSE
  2958.         IMPORT_CFM_FUNCTION GetNextTrackReferenceType
  2959.     ENDIF
  2960.  
  2961. ;
  2962. ; pascal long GetTrackReferenceCount(Track theTrack, OSType refType)
  2963. ;
  2964.     IF ¬ GENERATINGCFM THEN
  2965.         Macro
  2966.         _GetTrackReferenceCount
  2967.             move.w              #$01F5,D0
  2968.             dc.w                $AAAA
  2969.         EndM
  2970.     ELSE
  2971.         IMPORT_CFM_FUNCTION GetTrackReferenceCount
  2972.     ENDIF
  2973.  
  2974. ;
  2975. ;************************
  2976. ;* modifier track types
  2977. ;*************************
  2978. ;
  2979.  
  2980. kTrackModifierReference            EQU        'ssrc'
  2981. kTrackModifierInput                EQU        $696E                ; 'in'
  2982. kTrackModifierType                EQU        $7479                ; 'ty'
  2983.  
  2984. kTrackModifierTypeMatrix        EQU        1
  2985. kTrackModifierTypeClip            EQU        2
  2986. kTrackModifierTypeGraphicsMode    EQU        5
  2987. kTrackModifierTypeVolume        EQU        3
  2988. kTrackModifierTypeBalance        EQU        4
  2989. kTrackModifierTypeSpriteImage    EQU        'vide'
  2990. ModifierTrackGraphicsModeRecord RECORD 0
  2991. graphicsMode             ds.l    1                ; offset: $0 (0)
  2992. opColor                     ds        RGBColor        ; offset: $4 (4)
  2993. sizeof                     EQU *                    ; size:   $A (10)
  2994.                         ENDR
  2995. ;
  2996. ;************************
  2997. ;* high level file conversion routines
  2998. ;*************************
  2999. ;
  3000. ;
  3001. ; pascal OSErr ConvertFileToMovieFile(const FSSpec *inputFile, const FSSpec *outputFile, OSType creator, ScriptCode scriptTag, short *resID, long flags, ComponentInstance userComp, MovieProgressUPP proc, long refCon)
  3002. ;
  3003.     IF ¬ GENERATINGCFM THEN
  3004.         Macro
  3005.         _ConvertFileToMovieFile
  3006.             move.w              #$01CB,D0
  3007.             dc.w                $AAAA
  3008.         EndM
  3009.     ELSE
  3010.         IMPORT_CFM_FUNCTION ConvertFileToMovieFile
  3011.     ENDIF
  3012.  
  3013. ;
  3014. ; pascal OSErr ConvertMovieToFile(Movie theMovie, Track onlyTrack, FSSpec *outputFile, OSType fileType, OSType creator, ScriptCode scriptTag, short *resID, long flags, ComponentInstance userComp)
  3015. ;
  3016.     IF ¬ GENERATINGCFM THEN
  3017.         Macro
  3018.         _ConvertMovieToFile
  3019.             move.w              #$01CC,D0
  3020.             dc.w                $AAAA
  3021.         EndM
  3022.     ELSE
  3023.         IMPORT_CFM_FUNCTION ConvertMovieToFile
  3024.     ENDIF
  3025.  
  3026. ;
  3027. ;************************
  3028. ;* Movie Timebase Conversion Routines
  3029. ;*************************
  3030. ;
  3031. ;
  3032. ; pascal TimeValue TrackTimeToMediaTime(TimeValue value, Track theTrack)
  3033. ;
  3034.     IF ¬ GENERATINGCFM THEN
  3035.         Macro
  3036.         _TrackTimeToMediaTime
  3037.             move.w              #$0096,D0
  3038.             dc.w                $AAAA
  3039.         EndM
  3040.     ELSE
  3041.         IMPORT_CFM_FUNCTION TrackTimeToMediaTime
  3042.     ENDIF
  3043.  
  3044. ;
  3045. ; pascal Fixed GetTrackEditRate(Track theTrack, TimeValue atTime)
  3046. ;
  3047.     IF ¬ GENERATINGCFM THEN
  3048.         Macro
  3049.         _GetTrackEditRate
  3050.             move.w              #$0123,D0
  3051.             dc.w                $AAAA
  3052.         EndM
  3053.     ELSE
  3054.         IMPORT_CFM_FUNCTION GetTrackEditRate
  3055.     ENDIF
  3056.  
  3057. ;
  3058. ;************************
  3059. ;* Miscellaneous Routines
  3060. ;*************************
  3061. ;
  3062. ;
  3063. ; pascal long GetMovieDataSize(Movie theMovie, TimeValue startTime, TimeValue duration)
  3064. ;
  3065.     IF ¬ GENERATINGCFM THEN
  3066.         Macro
  3067.         _GetMovieDataSize
  3068.             move.w              #$0098,D0
  3069.             dc.w                $AAAA
  3070.         EndM
  3071.     ELSE
  3072.         IMPORT_CFM_FUNCTION GetMovieDataSize
  3073.     ENDIF
  3074.  
  3075. ;
  3076. ; pascal long GetTrackDataSize(Track theTrack, TimeValue startTime, TimeValue duration)
  3077. ;
  3078.     IF ¬ GENERATINGCFM THEN
  3079.         Macro
  3080.         _GetTrackDataSize
  3081.             move.w              #$0149,D0
  3082.             dc.w                $AAAA
  3083.         EndM
  3084.     ELSE
  3085.         IMPORT_CFM_FUNCTION GetTrackDataSize
  3086.     ENDIF
  3087.  
  3088. ;
  3089. ; pascal long GetMediaDataSize(Media theMedia, TimeValue startTime, TimeValue duration)
  3090. ;
  3091.     IF ¬ GENERATINGCFM THEN
  3092.         Macro
  3093.         _GetMediaDataSize
  3094.             move.w              #$0099,D0
  3095.             dc.w                $AAAA
  3096.         EndM
  3097.     ELSE
  3098.         IMPORT_CFM_FUNCTION GetMediaDataSize
  3099.     ENDIF
  3100.  
  3101. ;
  3102. ; pascal Boolean PtInMovie(Movie theMovie, Point pt)
  3103. ;
  3104.     IF ¬ GENERATINGCFM THEN
  3105.         Macro
  3106.         _PtInMovie
  3107.             move.w              #$009A,D0
  3108.             dc.w                $AAAA
  3109.         EndM
  3110.     ELSE
  3111.         IMPORT_CFM_FUNCTION PtInMovie
  3112.     ENDIF
  3113.  
  3114. ;
  3115. ; pascal Boolean PtInTrack(Track theTrack, Point pt)
  3116. ;
  3117.     IF ¬ GENERATINGCFM THEN
  3118.         Macro
  3119.         _PtInTrack
  3120.             move.w              #$009B,D0
  3121.             dc.w                $AAAA
  3122.         EndM
  3123.     ELSE
  3124.         IMPORT_CFM_FUNCTION PtInTrack
  3125.     ENDIF
  3126.  
  3127. ;
  3128. ;************************
  3129. ;* Group Selection Routines
  3130. ;*************************
  3131. ;
  3132. ;
  3133. ; pascal void SetMovieLanguage(Movie theMovie, long language)
  3134. ;
  3135.     IF ¬ GENERATINGCFM THEN
  3136.         Macro
  3137.         _SetMovieLanguage
  3138.             move.w              #$009C,D0
  3139.             dc.w                $AAAA
  3140.         EndM
  3141.     ELSE
  3142.         IMPORT_CFM_FUNCTION SetMovieLanguage
  3143.     ENDIF
  3144.  
  3145. ;
  3146. ;************************
  3147. ;* User Data
  3148. ;*************************
  3149. ;
  3150. ;
  3151. ; pascal OSErr GetUserData(UserData theUserData, Handle data, OSType udType, long index)
  3152. ;
  3153.     IF ¬ GENERATINGCFM THEN
  3154.         Macro
  3155.         _GetUserData
  3156.             move.w              #$009E,D0
  3157.             dc.w                $AAAA
  3158.         EndM
  3159.     ELSE
  3160.         IMPORT_CFM_FUNCTION GetUserData
  3161.     ENDIF
  3162.  
  3163. ;
  3164. ; pascal OSErr AddUserData(UserData theUserData, Handle data, OSType udType)
  3165. ;
  3166.     IF ¬ GENERATINGCFM THEN
  3167.         Macro
  3168.         _AddUserData
  3169.             move.w              #$009F,D0
  3170.             dc.w                $AAAA
  3171.         EndM
  3172.     ELSE
  3173.         IMPORT_CFM_FUNCTION AddUserData
  3174.     ENDIF
  3175.  
  3176. ;
  3177. ; pascal OSErr RemoveUserData(UserData theUserData, OSType udType, long index)
  3178. ;
  3179.     IF ¬ GENERATINGCFM THEN
  3180.         Macro
  3181.         _RemoveUserData
  3182.             move.w              #$00A0,D0
  3183.             dc.w                $AAAA
  3184.         EndM
  3185.     ELSE
  3186.         IMPORT_CFM_FUNCTION RemoveUserData
  3187.     ENDIF
  3188.  
  3189. ;
  3190. ; pascal short CountUserDataType(UserData theUserData, OSType udType)
  3191. ;
  3192.     IF ¬ GENERATINGCFM THEN
  3193.         Macro
  3194.         _CountUserDataType
  3195.             move.w              #$014B,D0
  3196.             dc.w                $AAAA
  3197.         EndM
  3198.     ELSE
  3199.         IMPORT_CFM_FUNCTION CountUserDataType
  3200.     ENDIF
  3201.  
  3202. ;
  3203. ; pascal long GetNextUserDataType(UserData theUserData, OSType udType)
  3204. ;
  3205.     IF ¬ GENERATINGCFM THEN
  3206.         Macro
  3207.         _GetNextUserDataType
  3208.             move.w              #$01A5,D0
  3209.             dc.w                $AAAA
  3210.         EndM
  3211.     ELSE
  3212.         IMPORT_CFM_FUNCTION GetNextUserDataType
  3213.     ENDIF
  3214.  
  3215. ;
  3216. ; pascal OSErr GetUserDataItem(UserData theUserData, void *data, long size, OSType udType, long index)
  3217. ;
  3218.     IF ¬ GENERATINGCFM THEN
  3219.         Macro
  3220.         _GetUserDataItem
  3221.             move.w              #$0126,D0
  3222.             dc.w                $AAAA
  3223.         EndM
  3224.     ELSE
  3225.         IMPORT_CFM_FUNCTION GetUserDataItem
  3226.     ENDIF
  3227.  
  3228. ;
  3229. ; pascal OSErr SetUserDataItem(UserData theUserData, void *data, long size, OSType udType, long index)
  3230. ;
  3231.     IF ¬ GENERATINGCFM THEN
  3232.         Macro
  3233.         _SetUserDataItem
  3234.             move.w              #$012E,D0
  3235.             dc.w                $AAAA
  3236.         EndM
  3237.     ELSE
  3238.         IMPORT_CFM_FUNCTION SetUserDataItem
  3239.     ENDIF
  3240.  
  3241. ;
  3242. ; pascal OSErr AddUserDataText(UserData theUserData, Handle data, OSType udType, long index, short itlRegionTag)
  3243. ;
  3244.     IF ¬ GENERATINGCFM THEN
  3245.         Macro
  3246.         _AddUserDataText
  3247.             move.w              #$014C,D0
  3248.             dc.w                $AAAA
  3249.         EndM
  3250.     ELSE
  3251.         IMPORT_CFM_FUNCTION AddUserDataText
  3252.     ENDIF
  3253.  
  3254. ;
  3255. ; pascal OSErr GetUserDataText(UserData theUserData, Handle data, OSType udType, long index, short itlRegionTag)
  3256. ;
  3257.     IF ¬ GENERATINGCFM THEN
  3258.         Macro
  3259.         _GetUserDataText
  3260.             move.w              #$014D,D0
  3261.             dc.w                $AAAA
  3262.         EndM
  3263.     ELSE
  3264.         IMPORT_CFM_FUNCTION GetUserDataText
  3265.     ENDIF
  3266.  
  3267. ;
  3268. ; pascal OSErr RemoveUserDataText(UserData theUserData, OSType udType, long index, short itlRegionTag)
  3269. ;
  3270.     IF ¬ GENERATINGCFM THEN
  3271.         Macro
  3272.         _RemoveUserDataText
  3273.             move.w              #$014E,D0
  3274.             dc.w                $AAAA
  3275.         EndM
  3276.     ELSE
  3277.         IMPORT_CFM_FUNCTION RemoveUserDataText
  3278.     ENDIF
  3279.  
  3280. ;
  3281. ; pascal OSErr NewUserData(UserData *theUserData)
  3282. ;
  3283.     IF ¬ GENERATINGCFM THEN
  3284.         Macro
  3285.         _NewUserData
  3286.             move.w              #$012F,D0
  3287.             dc.w                $AAAA
  3288.         EndM
  3289.     ELSE
  3290.         IMPORT_CFM_FUNCTION NewUserData
  3291.     ENDIF
  3292.  
  3293. ;
  3294. ; pascal OSErr DisposeUserData(UserData theUserData)
  3295. ;
  3296.     IF ¬ GENERATINGCFM THEN
  3297.         Macro
  3298.         _DisposeUserData
  3299.             move.w              #$0130,D0
  3300.             dc.w                $AAAA
  3301.         EndM
  3302.     ELSE
  3303.         IMPORT_CFM_FUNCTION DisposeUserData
  3304.     ENDIF
  3305.  
  3306. ;
  3307. ; pascal OSErr NewUserDataFromHandle(Handle h, UserData *theUserData)
  3308. ;
  3309.     IF ¬ GENERATINGCFM THEN
  3310.         Macro
  3311.         _NewUserDataFromHandle
  3312.             move.w              #$0131,D0
  3313.             dc.w                $AAAA
  3314.         EndM
  3315.     ELSE
  3316.         IMPORT_CFM_FUNCTION NewUserDataFromHandle
  3317.     ENDIF
  3318.  
  3319. ;
  3320. ; pascal OSErr PutUserDataIntoHandle(UserData theUserData, Handle h)
  3321. ;
  3322.     IF ¬ GENERATINGCFM THEN
  3323.         Macro
  3324.         _PutUserDataIntoHandle
  3325.             move.w              #$0132,D0
  3326.             dc.w                $AAAA
  3327.         EndM
  3328.     ELSE
  3329.         IMPORT_CFM_FUNCTION PutUserDataIntoHandle
  3330.     ENDIF
  3331.  
  3332. ;
  3333. ; pascal void GetMediaNextInterestingTime(Media theMedia, short interestingTimeFlags, TimeValue time, Fixed rate, TimeValue *interestingTime, TimeValue *interestingDuration)
  3334. ;
  3335.     IF ¬ GENERATINGCFM THEN
  3336.         Macro
  3337.         _GetMediaNextInterestingTime
  3338.             move.w              #$016D,D0
  3339.             dc.w                $AAAA
  3340.         EndM
  3341.     ELSE
  3342.         IMPORT_CFM_FUNCTION GetMediaNextInterestingTime
  3343.     ENDIF
  3344.  
  3345. ;
  3346. ; pascal void GetTrackNextInterestingTime(Track theTrack, short interestingTimeFlags, TimeValue time, Fixed rate, TimeValue *interestingTime, TimeValue *interestingDuration)
  3347. ;
  3348.     IF ¬ GENERATINGCFM THEN
  3349.         Macro
  3350.         _GetTrackNextInterestingTime
  3351.             move.w              #$00E2,D0
  3352.             dc.w                $AAAA
  3353.         EndM
  3354.     ELSE
  3355.         IMPORT_CFM_FUNCTION GetTrackNextInterestingTime
  3356.     ENDIF
  3357.  
  3358. ;
  3359. ; pascal void GetMovieNextInterestingTime(Movie theMovie, short interestingTimeFlags, short numMediaTypes, const OSType *whichMediaTypes, TimeValue time, Fixed rate, TimeValue *interestingTime, TimeValue *interestingDuration)
  3360. ;
  3361.     IF ¬ GENERATINGCFM THEN
  3362.         Macro
  3363.         _GetMovieNextInterestingTime
  3364.             move.w              #$010E,D0
  3365.             dc.w                $AAAA
  3366.         EndM
  3367.     ELSE
  3368.         IMPORT_CFM_FUNCTION GetMovieNextInterestingTime
  3369.     ENDIF
  3370.  
  3371. ;
  3372. ; pascal OSErr CreateMovieFile(const FSSpec *fileSpec, OSType creator, ScriptCode scriptTag, long createMovieFileFlags, short *resRefNum, Movie *newmovie)
  3373. ;
  3374.     IF ¬ GENERATINGCFM THEN
  3375.         Macro
  3376.         _CreateMovieFile
  3377.             move.w              #$0191,D0
  3378.             dc.w                $AAAA
  3379.         EndM
  3380.     ELSE
  3381.         IMPORT_CFM_FUNCTION CreateMovieFile
  3382.     ENDIF
  3383.  
  3384. ;
  3385. ; pascal OSErr OpenMovieFile(const FSSpec *fileSpec, short *resRefNum, SInt8 permission)
  3386. ;
  3387.     IF ¬ GENERATINGCFM THEN
  3388.         Macro
  3389.         _OpenMovieFile
  3390.             move.w              #$0192,D0
  3391.             dc.w                $AAAA
  3392.         EndM
  3393.     ELSE
  3394.         IMPORT_CFM_FUNCTION OpenMovieFile
  3395.     ENDIF
  3396.  
  3397. ;
  3398. ; pascal OSErr CloseMovieFile(short resRefNum)
  3399. ;
  3400.     IF ¬ GENERATINGCFM THEN
  3401.         Macro
  3402.         _CloseMovieFile
  3403.             move.w              #$00D5,D0
  3404.             dc.w                $AAAA
  3405.         EndM
  3406.     ELSE
  3407.         IMPORT_CFM_FUNCTION CloseMovieFile
  3408.     ENDIF
  3409.  
  3410. ;
  3411. ; pascal OSErr DeleteMovieFile(const FSSpec *fileSpec)
  3412. ;
  3413.     IF ¬ GENERATINGCFM THEN
  3414.         Macro
  3415.         _DeleteMovieFile
  3416.             move.w              #$0175,D0
  3417.             dc.w                $AAAA
  3418.         EndM
  3419.     ELSE
  3420.         IMPORT_CFM_FUNCTION DeleteMovieFile
  3421.     ENDIF
  3422.  
  3423. ;
  3424. ; pascal OSErr NewMovieFromFile(Movie *theMovie, short resRefNum, short *resId, StringPtr resName, short newMovieFlags, Boolean *dataRefWasChanged)
  3425. ;
  3426.     IF ¬ GENERATINGCFM THEN
  3427.         Macro
  3428.         _NewMovieFromFile
  3429.             move.w              #$00F0,D0
  3430.             dc.w                $AAAA
  3431.         EndM
  3432.     ELSE
  3433.         IMPORT_CFM_FUNCTION NewMovieFromFile
  3434.     ENDIF
  3435.  
  3436. ;
  3437. ; pascal OSErr NewMovieFromHandle(Movie *theMovie, Handle h, short newMovieFlags, Boolean *dataRefWasChanged)
  3438. ;
  3439.     IF ¬ GENERATINGCFM THEN
  3440.         Macro
  3441.         _NewMovieFromHandle
  3442.             move.w              #$00F1,D0
  3443.             dc.w                $AAAA
  3444.         EndM
  3445.     ELSE
  3446.         IMPORT_CFM_FUNCTION NewMovieFromHandle
  3447.     ENDIF
  3448.  
  3449. ;
  3450. ; pascal OSErr NewMovieFromDataFork(Movie *theMovie, short fRefNum, long fileOffset, short newMovieFlags, Boolean *dataRefWasChanged)
  3451. ;
  3452.     IF ¬ GENERATINGCFM THEN
  3453.         Macro
  3454.         _NewMovieFromDataFork
  3455.             move.w              #$01B3,D0
  3456.             dc.w                $AAAA
  3457.         EndM
  3458.     ELSE
  3459.         IMPORT_CFM_FUNCTION NewMovieFromDataFork
  3460.     ENDIF
  3461.  
  3462. ;
  3463. ; pascal OSErr NewMovieFromUserProc(Movie *m, short flags, Boolean *dataRefWasChanged, GetMovieUPP getProc, void *refCon, Handle defaultDataRef, OSType dataRefType)
  3464. ;
  3465.     IF ¬ GENERATINGCFM THEN
  3466.         Macro
  3467.         _NewMovieFromUserProc
  3468.             move.w              #$01EC,D0
  3469.             dc.w                $AAAA
  3470.         EndM
  3471.     ELSE
  3472.         IMPORT_CFM_FUNCTION NewMovieFromUserProc
  3473.     ENDIF
  3474.  
  3475. ;
  3476. ; pascal OSErr NewMovieFromDataRef(Movie *m, short flags, short *id, Handle dataRef, OSType dataRefType)
  3477. ;
  3478.     IF ¬ GENERATINGCFM THEN
  3479.         Macro
  3480.         _NewMovieFromDataRef
  3481.             move.w              #$0220,D0
  3482.             dc.w                $AAAA
  3483.         EndM
  3484.     ELSE
  3485.         IMPORT_CFM_FUNCTION NewMovieFromDataRef
  3486.     ENDIF
  3487.  
  3488. ;
  3489. ; pascal OSErr AddMovieResource(Movie theMovie, short resRefNum, short *resId, ConstStr255Param resName)
  3490. ;
  3491.     IF ¬ GENERATINGCFM THEN
  3492.         Macro
  3493.         _AddMovieResource
  3494.             move.w              #$00D7,D0
  3495.             dc.w                $AAAA
  3496.         EndM
  3497.     ELSE
  3498.         IMPORT_CFM_FUNCTION AddMovieResource
  3499.     ENDIF
  3500.  
  3501. ;
  3502. ; pascal OSErr UpdateMovieResource(Movie theMovie, short resRefNum, short resId, ConstStr255Param resName)
  3503. ;
  3504.     IF ¬ GENERATINGCFM THEN
  3505.         Macro
  3506.         _UpdateMovieResource
  3507.             move.w              #$00D8,D0
  3508.             dc.w                $AAAA
  3509.         EndM
  3510.     ELSE
  3511.         IMPORT_CFM_FUNCTION UpdateMovieResource
  3512.     ENDIF
  3513.  
  3514. ;
  3515. ; pascal OSErr RemoveMovieResource(short resRefNum, short resId)
  3516. ;
  3517.     IF ¬ GENERATINGCFM THEN
  3518.         Macro
  3519.         _RemoveMovieResource
  3520.             move.w              #$0176,D0
  3521.             dc.w                $AAAA
  3522.         EndM
  3523.     ELSE
  3524.         IMPORT_CFM_FUNCTION RemoveMovieResource
  3525.     ENDIF
  3526.  
  3527. ;
  3528. ; pascal Boolean HasMovieChanged(Movie theMovie)
  3529. ;
  3530.     IF ¬ GENERATINGCFM THEN
  3531.         Macro
  3532.         _HasMovieChanged
  3533.             move.w              #$00D9,D0
  3534.             dc.w                $AAAA
  3535.         EndM
  3536.     ELSE
  3537.         IMPORT_CFM_FUNCTION HasMovieChanged
  3538.     ENDIF
  3539.  
  3540. ;
  3541. ; pascal void ClearMovieChanged(Movie theMovie)
  3542. ;
  3543.     IF ¬ GENERATINGCFM THEN
  3544.         Macro
  3545.         _ClearMovieChanged
  3546.             move.w              #$0113,D0
  3547.             dc.w                $AAAA
  3548.         EndM
  3549.     ELSE
  3550.         IMPORT_CFM_FUNCTION ClearMovieChanged
  3551.     ENDIF
  3552.  
  3553. ;
  3554. ; pascal OSErr SetMovieDefaultDataRef(Movie theMovie, Handle dataRef, OSType dataRefType)
  3555. ;
  3556.     IF ¬ GENERATINGCFM THEN
  3557.         Macro
  3558.         _SetMovieDefaultDataRef
  3559.             move.w              #$01C1,D0
  3560.             dc.w                $AAAA
  3561.         EndM
  3562.     ELSE
  3563.         IMPORT_CFM_FUNCTION SetMovieDefaultDataRef
  3564.     ENDIF
  3565.  
  3566. ;
  3567. ; pascal OSErr GetMovieDefaultDataRef(Movie theMovie, Handle *dataRef, OSType *dataRefType)
  3568. ;
  3569.     IF ¬ GENERATINGCFM THEN
  3570.         Macro
  3571.         _GetMovieDefaultDataRef
  3572.             move.w              #$01D2,D0
  3573.             dc.w                $AAAA
  3574.         EndM
  3575.     ELSE
  3576.         IMPORT_CFM_FUNCTION GetMovieDefaultDataRef
  3577.     ENDIF
  3578.  
  3579. ;
  3580. ; pascal OSErr SetMovieColorTable(Movie theMovie, CTabHandle ctab)
  3581. ;
  3582.     IF ¬ GENERATINGCFM THEN
  3583.         Macro
  3584.         _SetMovieColorTable
  3585.             move.w              #$0205,D0
  3586.             dc.w                $AAAA
  3587.         EndM
  3588.     ELSE
  3589.         IMPORT_CFM_FUNCTION SetMovieColorTable
  3590.     ENDIF
  3591.  
  3592. ;
  3593. ; pascal OSErr GetMovieColorTable(Movie theMovie, CTabHandle *ctab)
  3594. ;
  3595.     IF ¬ GENERATINGCFM THEN
  3596.         Macro
  3597.         _GetMovieColorTable
  3598.             move.w              #$0206,D0
  3599.             dc.w                $AAAA
  3600.         EndM
  3601.     ELSE
  3602.         IMPORT_CFM_FUNCTION GetMovieColorTable
  3603.     ENDIF
  3604.  
  3605. ;
  3606. ; pascal void FlattenMovie(Movie theMovie, long movieFlattenFlags, const FSSpec *theFile, OSType creator, ScriptCode scriptTag, long createMovieFileFlags, short *resId, ConstStr255Param resName)
  3607. ;
  3608.     IF ¬ GENERATINGCFM THEN
  3609.         Macro
  3610.         _FlattenMovie
  3611.             move.w              #$019B,D0
  3612.             dc.w                $AAAA
  3613.         EndM
  3614.     ELSE
  3615.         IMPORT_CFM_FUNCTION FlattenMovie
  3616.     ENDIF
  3617.  
  3618. ;
  3619. ; pascal Movie FlattenMovieData(Movie theMovie, long movieFlattenFlags, const FSSpec *theFile, OSType creator, ScriptCode scriptTag, long createMovieFileFlags)
  3620. ;
  3621.     IF ¬ GENERATINGCFM THEN
  3622.         Macro
  3623.         _FlattenMovieData
  3624.             move.w              #$019C,D0
  3625.             dc.w                $AAAA
  3626.         EndM
  3627.     ELSE
  3628.         IMPORT_CFM_FUNCTION FlattenMovieData
  3629.     ENDIF
  3630.  
  3631. ;
  3632. ; pascal void SetMovieProgressProc(Movie theMovie, MovieProgressUPP p, long refcon)
  3633. ;
  3634.     IF ¬ GENERATINGCFM THEN
  3635.         Macro
  3636.         _SetMovieProgressProc
  3637.             move.w              #$019A,D0
  3638.             dc.w                $AAAA
  3639.         EndM
  3640.     ELSE
  3641.         IMPORT_CFM_FUNCTION SetMovieProgressProc
  3642.     ENDIF
  3643.  
  3644. ;
  3645. ;************************
  3646. ;* Video Media routines
  3647. ;*************************
  3648. ;
  3649. ;
  3650. ; pascal HandlerError GetVideoMediaGraphicsMode(MediaHandler mh, long *graphicsMode, RGBColor *opColor)
  3651. ;
  3652.     IF ¬ GENERATINGCFM THEN
  3653.         Macro
  3654.         _GetVideoMediaGraphicsMode
  3655.             move.l              #$00080101,-(sp)
  3656.             moveq               #0,D0
  3657.             dc.w                $A82A
  3658.         EndM
  3659.     ELSE
  3660.         IMPORT_CFM_FUNCTION GetVideoMediaGraphicsMode
  3661.     ENDIF
  3662.  
  3663. ;
  3664. ; pascal HandlerError SetVideoMediaGraphicsMode(MediaHandler mh, long graphicsMode, const RGBColor *opColor)
  3665. ;
  3666.     IF ¬ GENERATINGCFM THEN
  3667.         Macro
  3668.         _SetVideoMediaGraphicsMode
  3669.             move.l              #$00080102,-(sp)
  3670.             moveq               #0,D0
  3671.             dc.w                $A82A
  3672.         EndM
  3673.     ELSE
  3674.         IMPORT_CFM_FUNCTION SetVideoMediaGraphicsMode
  3675.     ENDIF
  3676.  
  3677. ;  use these two routines at your own peril
  3678. ;
  3679. ; pascal HandlerError ResetVideoMediaStatistics(MediaHandler mh)
  3680. ;
  3681.     IF ¬ GENERATINGCFM THEN
  3682.         Macro
  3683.         _ResetVideoMediaStatistics
  3684.             move.l              #$00000105,-(sp)
  3685.             moveq               #0,D0
  3686.             dc.w                $A82A
  3687.         EndM
  3688.     ELSE
  3689.         IMPORT_CFM_FUNCTION ResetVideoMediaStatistics
  3690.     ENDIF
  3691.  
  3692. ;
  3693. ; pascal Fixed GetVideoMediaStatistics(MediaHandler mh)
  3694. ;
  3695.     IF ¬ GENERATINGCFM THEN
  3696.         Macro
  3697.         _GetVideoMediaStatistics
  3698.             move.l              #$00000106,-(sp)
  3699.             moveq               #0,D0
  3700.             dc.w                $A82A
  3701.         EndM
  3702.     ELSE
  3703.         IMPORT_CFM_FUNCTION GetVideoMediaStatistics
  3704.     ENDIF
  3705.  
  3706. ;
  3707. ;************************
  3708. ;* Sound Media routines
  3709. ;*************************
  3710. ;
  3711. ;
  3712. ; pascal HandlerError GetSoundMediaBalance(MediaHandler mh, short *balance)
  3713. ;
  3714.     IF ¬ GENERATINGCFM THEN
  3715.         Macro
  3716.         _GetSoundMediaBalance
  3717.             move.l              #$00040101,-(sp)
  3718.             moveq               #0,D0
  3719.             dc.w                $A82A
  3720.         EndM
  3721.     ELSE
  3722.         IMPORT_CFM_FUNCTION GetSoundMediaBalance
  3723.     ENDIF
  3724.  
  3725. ;
  3726. ; pascal HandlerError SetSoundMediaBalance(MediaHandler mh, short balance)
  3727. ;
  3728.     IF ¬ GENERATINGCFM THEN
  3729.         Macro
  3730.         _SetSoundMediaBalance
  3731.             move.l              #$00020102,-(sp)
  3732.             moveq               #0,D0
  3733.             dc.w                $A82A
  3734.         EndM
  3735.     ELSE
  3736.         IMPORT_CFM_FUNCTION SetSoundMediaBalance
  3737.     ENDIF
  3738.  
  3739. ;
  3740. ;************************
  3741. ;* Sprite Media routines
  3742. ;*************************
  3743. ;
  3744. ;  flags for HitTestSpriteMedia 
  3745.  
  3746. spriteHitTestBounds                EQU        $00000001            ;    point must only be within sprite's bounding box
  3747. spriteHitTestImage                EQU        $00000002            ;  point must be within the shape of the sprite's image
  3748. ;  atom types for sprite media 
  3749.  
  3750. kSpriteAtomType                    EQU        'sprt'
  3751. kSpriteImagesContainerAtomType    EQU        'imct'
  3752. kSpriteImageAtomType            EQU        'imag'
  3753. kSpriteImageDataAtomType        EQU        'imda'
  3754. kSpriteSharedDataAtomType        EQU        'dflt'
  3755. kSpriteNameAtomType                EQU        'name'
  3756. ;
  3757. ; pascal ComponentResult SetSpriteMediaSpriteProperty(MediaHandler mh, short spriteIndex, long propertyType, void *propertyValue)
  3758. ;
  3759.     IF ¬ GENERATINGCFM THEN
  3760.         Macro
  3761.         _SetSpriteMediaSpriteProperty
  3762.             move.l              #$000A0101,-(sp)
  3763.             moveq               #0,D0
  3764.             dc.w                $A82A
  3765.         EndM
  3766.     ELSE
  3767.         IMPORT_CFM_FUNCTION SetSpriteMediaSpriteProperty
  3768.     ENDIF
  3769.  
  3770. ;
  3771. ; pascal ComponentResult GetSpriteMediaSpriteProperty(MediaHandler mh, short spriteIndex, long propertyType, void *propertyValue)
  3772. ;
  3773.     IF ¬ GENERATINGCFM THEN
  3774.         Macro
  3775.         _GetSpriteMediaSpriteProperty
  3776.             move.l              #$000A0102,-(sp)
  3777.             moveq               #0,D0
  3778.             dc.w                $A82A
  3779.         EndM
  3780.     ELSE
  3781.         IMPORT_CFM_FUNCTION GetSpriteMediaSpriteProperty
  3782.     ENDIF
  3783.  
  3784. ;
  3785. ; pascal ComponentResult HitTestSpriteMedia(MediaHandler mh, long flags, Point loc, short *spriteHitIndex)
  3786. ;
  3787.     IF ¬ GENERATINGCFM THEN
  3788.         Macro
  3789.         _HitTestSpriteMedia
  3790.             move.l              #$000C0103,-(sp)
  3791.             moveq               #0,D0
  3792.             dc.w                $A82A
  3793.         EndM
  3794.     ELSE
  3795.         IMPORT_CFM_FUNCTION HitTestSpriteMedia
  3796.     ENDIF
  3797.  
  3798. ;
  3799. ; pascal ComponentResult CountSpriteMediaSprites(MediaHandler mh, short *numSprites)
  3800. ;
  3801.     IF ¬ GENERATINGCFM THEN
  3802.         Macro
  3803.         _CountSpriteMediaSprites
  3804.             move.l              #$00040104,-(sp)
  3805.             moveq               #0,D0
  3806.             dc.w                $A82A
  3807.         EndM
  3808.     ELSE
  3809.         IMPORT_CFM_FUNCTION CountSpriteMediaSprites
  3810.     ENDIF
  3811.  
  3812. ;
  3813. ; pascal ComponentResult CountSpriteMediaImages(MediaHandler mh, short *numImages)
  3814. ;
  3815.     IF ¬ GENERATINGCFM THEN
  3816.         Macro
  3817.         _CountSpriteMediaImages
  3818.             move.l              #$00040105,-(sp)
  3819.             moveq               #0,D0
  3820.             dc.w                $A82A
  3821.         EndM
  3822.     ELSE
  3823.         IMPORT_CFM_FUNCTION CountSpriteMediaImages
  3824.     ENDIF
  3825.  
  3826. ;
  3827. ; pascal ComponentResult GetSpriteMediaIndImageDescription(MediaHandler mh, short imageIndex, ImageDescriptionHandle imageDescription)
  3828. ;
  3829.     IF ¬ GENERATINGCFM THEN
  3830.         Macro
  3831.         _GetSpriteMediaIndImageDescription
  3832.             move.l              #$00060106,-(sp)
  3833.             moveq               #0,D0
  3834.             dc.w                $A82A
  3835.         EndM
  3836.     ELSE
  3837.         IMPORT_CFM_FUNCTION GetSpriteMediaIndImageDescription
  3838.     ENDIF
  3839.  
  3840. ;
  3841. ; pascal ComponentResult GetDisplayedSampleNumber(MediaHandler mh, long *sampleNum)
  3842. ;
  3843.     IF ¬ GENERATINGCFM THEN
  3844.         Macro
  3845.         _GetDisplayedSampleNumber
  3846.             move.l              #$00070107,-(sp)
  3847.             moveq               #0,D0
  3848.             dc.w                $A82A
  3849.         EndM
  3850.     ELSE
  3851.         IMPORT_CFM_FUNCTION GetDisplayedSampleNumber
  3852.     ENDIF
  3853.  
  3854. ;
  3855. ;************************
  3856. ;* Text Media routines
  3857. ;*************************
  3858. ;
  3859. ;  Return displayFlags for TextProc 
  3860.  
  3861. txtProcDefaultDisplay            EQU        0                    ;    Use the media's default
  3862. txtProcDontDisplay                EQU        1                    ;    Don't display the text
  3863. txtProcDoDisplay                EQU        2                    ;    Do display the text
  3864. ;
  3865. ; pascal ComponentResult SetTextProc(MediaHandler mh, TextMediaUPP TextProc, long refcon)
  3866. ;
  3867.     IF ¬ GENERATINGCFM THEN
  3868.         Macro
  3869.         _SetTextProc
  3870.             move.l              #$00080101,-(sp)
  3871.             moveq               #0,D0
  3872.             dc.w                $A82A
  3873.         EndM
  3874.     ELSE
  3875.         IMPORT_CFM_FUNCTION SetTextProc
  3876.     ENDIF
  3877.  
  3878. ;
  3879. ; pascal ComponentResult AddTextSample(MediaHandler mh, Ptr text, unsigned long size, short fontNumber, short fontSize, Style textFace, RGBColor *textColor, RGBColor *backColor, short textJustification, Rect *textBox, long displayFlags, TimeValue scrollDelay, short hiliteStart, short hiliteEnd, RGBColor *rgbHiliteColor, TimeValue duration, TimeValue *sampleTime)
  3880. ;
  3881.     IF ¬ GENERATINGCFM THEN
  3882.         Macro
  3883.         _AddTextSample
  3884.             move.l              #$00340102,-(sp)
  3885.             moveq               #0,D0
  3886.             dc.w                $A82A
  3887.         EndM
  3888.     ELSE
  3889.         IMPORT_CFM_FUNCTION AddTextSample
  3890.     ENDIF
  3891.  
  3892. ;
  3893. ; pascal ComponentResult AddTESample(MediaHandler mh, TEHandle hTE, RGBColor *backColor, short textJustification, Rect *textBox, long displayFlags, TimeValue scrollDelay, short hiliteStart, short hiliteEnd, RGBColor *rgbHiliteColor, TimeValue duration, TimeValue *sampleTime)
  3894. ;
  3895.     IF ¬ GENERATINGCFM THEN
  3896.         Macro
  3897.         _AddTESample
  3898.             move.l              #$00260103,-(sp)
  3899.             moveq               #0,D0
  3900.             dc.w                $A82A
  3901.         EndM
  3902.     ELSE
  3903.         IMPORT_CFM_FUNCTION AddTESample
  3904.     ENDIF
  3905.  
  3906. ;
  3907. ; pascal ComponentResult AddHiliteSample(MediaHandler mh, short hiliteStart, short hiliteEnd, RGBColor *rgbHiliteColor, TimeValue duration, TimeValue *sampleTime)
  3908. ;
  3909.     IF ¬ GENERATINGCFM THEN
  3910.         Macro
  3911.         _AddHiliteSample
  3912.             move.l              #$00100104,-(sp)
  3913.             moveq               #0,D0
  3914.             dc.w                $A82A
  3915.         EndM
  3916.     ELSE
  3917.         IMPORT_CFM_FUNCTION AddHiliteSample
  3918.     ENDIF
  3919.  
  3920.  
  3921. findTextEdgeOK                    EQU        $01                    ; Okay to find text at specified sample time
  3922. findTextCaseSensitive            EQU        $02                    ; Case sensitive search
  3923. findTextReverseSearch            EQU        $04                    ; Search from sampleTime backwards
  3924. findTextWrapAround                EQU        $08                    ; Wrap search when beginning or end of movie is hit
  3925. findTextUseOffset                EQU        $10                    ; Begin search at the given character offset into sample rather than edge
  3926. ;
  3927. ; pascal ComponentResult FindNextText(MediaHandler mh, Ptr text, long size, short findFlags, TimeValue startTime, TimeValue *foundTime, TimeValue *foundDuration, long *offset)
  3928. ;
  3929.     IF ¬ GENERATINGCFM THEN
  3930.         Macro
  3931.         _FindNextText
  3932.             move.l              #$001A0105,-(sp)
  3933.             moveq               #0,D0
  3934.             dc.w                $A82A
  3935.         EndM
  3936.     ELSE
  3937.         IMPORT_CFM_FUNCTION FindNextText
  3938.     ENDIF
  3939.  
  3940. ;
  3941. ; pascal ComponentResult HiliteTextSample(MediaHandler mh, TimeValue sampleTime, short hiliteStart, short hiliteEnd, RGBColor *rgbHiliteColor)
  3942. ;
  3943.     IF ¬ GENERATINGCFM THEN
  3944.         Macro
  3945.         _HiliteTextSample
  3946.             move.l              #$000C0106,-(sp)
  3947.             moveq               #0,D0
  3948.             dc.w                $A82A
  3949.         EndM
  3950.     ELSE
  3951.         IMPORT_CFM_FUNCTION HiliteTextSample
  3952.     ENDIF
  3953.  
  3954.  
  3955. dropShadowOffsetType            EQU        'drpo'
  3956. dropShadowTranslucencyType        EQU        'drpt'
  3957. ;
  3958. ; pascal ComponentResult SetTextSampleData(MediaHandler mh, void *data, OSType dataType)
  3959. ;
  3960.     IF ¬ GENERATINGCFM THEN
  3961.         Macro
  3962.         _SetTextSampleData
  3963.             move.l              #$00080107,-(sp)
  3964.             moveq               #0,D0
  3965.             dc.w                $A82A
  3966.         EndM
  3967.     ELSE
  3968.         IMPORT_CFM_FUNCTION SetTextSampleData
  3969.     ENDIF
  3970.  
  3971. ;
  3972. ; pascal OSErr MovieSearchText(Movie theMovie, Ptr text, long size, long searchFlags, Track *searchTrack, TimeValue *searchTime, long *searchOffset)
  3973. ;
  3974.     IF ¬ GENERATINGCFM THEN
  3975.         Macro
  3976.         _MovieSearchText
  3977.             move.w              #$0207,D0
  3978.             dc.w                $AAAA
  3979.         EndM
  3980.     ELSE
  3981.         IMPORT_CFM_FUNCTION MovieSearchText
  3982.     ENDIF
  3983.  
  3984. ;
  3985. ; pascal void GetPosterBox(Movie theMovie, Rect *boxRect)
  3986. ;
  3987.     IF ¬ GENERATINGCFM THEN
  3988.         Macro
  3989.         _GetPosterBox
  3990.             move.w              #$016F,D0
  3991.             dc.w                $AAAA
  3992.         EndM
  3993.     ELSE
  3994.         IMPORT_CFM_FUNCTION GetPosterBox
  3995.     ENDIF
  3996.  
  3997. ;
  3998. ; pascal void SetPosterBox(Movie theMovie, const Rect *boxRect)
  3999. ;
  4000.     IF ¬ GENERATINGCFM THEN
  4001.         Macro
  4002.         _SetPosterBox
  4003.             move.w              #$0170,D0
  4004.             dc.w                $AAAA
  4005.         EndM
  4006.     ELSE
  4007.         IMPORT_CFM_FUNCTION SetPosterBox
  4008.     ENDIF
  4009.  
  4010. ;
  4011. ; pascal RgnHandle GetMovieSegmentDisplayBoundsRgn(Movie theMovie, TimeValue time, TimeValue duration)
  4012. ;
  4013.     IF ¬ GENERATINGCFM THEN
  4014.         Macro
  4015.         _GetMovieSegmentDisplayBoundsRgn
  4016.             move.w              #$016C,D0
  4017.             dc.w                $AAAA
  4018.         EndM
  4019.     ELSE
  4020.         IMPORT_CFM_FUNCTION GetMovieSegmentDisplayBoundsRgn
  4021.     ENDIF
  4022.  
  4023. ;
  4024. ; pascal RgnHandle GetTrackSegmentDisplayBoundsRgn(Track theTrack, TimeValue time, TimeValue duration)
  4025. ;
  4026.     IF ¬ GENERATINGCFM THEN
  4027.         Macro
  4028.         _GetTrackSegmentDisplayBoundsRgn
  4029.             move.w              #$016B,D0
  4030.             dc.w                $AAAA
  4031.         EndM
  4032.     ELSE
  4033.         IMPORT_CFM_FUNCTION GetTrackSegmentDisplayBoundsRgn
  4034.     ENDIF
  4035.  
  4036. ;
  4037. ; pascal void SetMovieCoverProcs(Movie theMovie, MovieRgnCoverUPP uncoverProc, MovieRgnCoverUPP coverProc, long refcon)
  4038. ;
  4039.     IF ¬ GENERATINGCFM THEN
  4040.         Macro
  4041.         _SetMovieCoverProcs
  4042.             move.w              #$0179,D0
  4043.             dc.w                $AAAA
  4044.         EndM
  4045.     ELSE
  4046.         IMPORT_CFM_FUNCTION SetMovieCoverProcs
  4047.     ENDIF
  4048.  
  4049. ;
  4050. ; pascal OSErr GetMovieCoverProcs(Movie theMovie, MovieRgnCoverUPP *uncoverProc, MovieRgnCoverUPP *coverProc, long *refcon)
  4051. ;
  4052.     IF ¬ GENERATINGCFM THEN
  4053.         Macro
  4054.         _GetMovieCoverProcs
  4055.             move.w              #$01DD,D0
  4056.             dc.w                $AAAA
  4057.         EndM
  4058.     ELSE
  4059.         IMPORT_CFM_FUNCTION GetMovieCoverProcs
  4060.     ENDIF
  4061.  
  4062. ;
  4063. ; pascal ComponentResult GetTrackStatus(Track theTrack)
  4064. ;
  4065.     IF ¬ GENERATINGCFM THEN
  4066.         Macro
  4067.         _GetTrackStatus
  4068.             move.w              #$0172,D0
  4069.             dc.w                $AAAA
  4070.         EndM
  4071.     ELSE
  4072.         IMPORT_CFM_FUNCTION GetTrackStatus
  4073.     ENDIF
  4074.  
  4075. ;
  4076. ; pascal ComponentResult GetMovieStatus(Movie theMovie, Track *firstProblemTrack)
  4077. ;
  4078.     IF ¬ GENERATINGCFM THEN
  4079.         Macro
  4080.         _GetMovieStatus
  4081.             move.w              #$0173,D0
  4082.             dc.w                $AAAA
  4083.         EndM
  4084.     ELSE
  4085.         IMPORT_CFM_FUNCTION GetMovieStatus
  4086.     ENDIF
  4087.  
  4088. ;
  4089. ;***
  4090. ;    Movie Controller support routines
  4091. ;***
  4092. ;
  4093. ;
  4094. ; pascal ComponentInstance NewMovieController(Movie theMovie, const Rect *movieRect, long someFlags)
  4095. ;
  4096.     IF ¬ GENERATINGCFM THEN
  4097.         Macro
  4098.         _NewMovieController
  4099.             move.w              #$018A,D0
  4100.             dc.w                $AAAA
  4101.         EndM
  4102.     ELSE
  4103.         IMPORT_CFM_FUNCTION NewMovieController
  4104.     ENDIF
  4105.  
  4106. ;
  4107. ; pascal void DisposeMovieController(ComponentInstance mc)
  4108. ;
  4109.     IF ¬ GENERATINGCFM THEN
  4110.         Macro
  4111.         _DisposeMovieController
  4112.             move.w              #$018B,D0
  4113.             dc.w                $AAAA
  4114.         EndM
  4115.     ELSE
  4116.         IMPORT_CFM_FUNCTION DisposeMovieController
  4117.     ENDIF
  4118.  
  4119.     ENDIF
  4120.     IF FOR_SYSTEM7_AND_SYSTEM8_DEPRECATED THEN
  4121. ;
  4122. ; pascal void ShowMovieInformation(Movie theMovie, ModalFilterUPP filterProc, long refCon)
  4123. ;
  4124.     IF ¬ GENERATINGCFM THEN
  4125.         Macro
  4126.         _ShowMovieInformation
  4127.             move.w              #$0209,D0
  4128.             dc.w                $AAAA
  4129.         EndM
  4130.     ELSE
  4131.         IMPORT_CFM_FUNCTION ShowMovieInformation
  4132.     ENDIF
  4133.  
  4134.     ENDIF
  4135.     IF FOR_SYSTEM7_AND_SYSTEM8_COOPERATIVE THEN
  4136. ;
  4137. ;****
  4138. ;    Scrap routines
  4139. ;****
  4140. ;
  4141. ;
  4142. ; pascal OSErr PutMovieOnScrap(Movie theMovie, long movieScrapFlags)
  4143. ;
  4144.     IF ¬ GENERATINGCFM THEN
  4145.         Macro
  4146.         _PutMovieOnScrap
  4147.             move.w              #$018C,D0
  4148.             dc.w                $AAAA
  4149.         EndM
  4150.     ELSE
  4151.         IMPORT_CFM_FUNCTION PutMovieOnScrap
  4152.     ENDIF
  4153.  
  4154. ;
  4155. ; pascal Movie NewMovieFromScrap(long newMovieFlags)
  4156. ;
  4157.     IF ¬ GENERATINGCFM THEN
  4158.         Macro
  4159.         _NewMovieFromScrap
  4160.             move.w              #$018D,D0
  4161.             dc.w                $AAAA
  4162.         EndM
  4163.     ELSE
  4164.         IMPORT_CFM_FUNCTION NewMovieFromScrap
  4165.     ENDIF
  4166.  
  4167. ;
  4168. ;****
  4169. ;    DataRef routines
  4170. ;****
  4171. ;
  4172. ;
  4173. ; pascal OSErr GetMediaDataRef(Media theMedia, short index, Handle *dataRef, OSType *dataRefType, long *dataRefAttributes)
  4174. ;
  4175.     IF ¬ GENERATINGCFM THEN
  4176.         Macro
  4177.         _GetMediaDataRef
  4178.             move.w              #$0197,D0
  4179.             dc.w                $AAAA
  4180.         EndM
  4181.     ELSE
  4182.         IMPORT_CFM_FUNCTION GetMediaDataRef
  4183.     ENDIF
  4184.  
  4185. ;
  4186. ; pascal OSErr SetMediaDataRef(Media theMedia, short index, Handle dataRef, OSType dataRefType)
  4187. ;
  4188.     IF ¬ GENERATINGCFM THEN
  4189.         Macro
  4190.         _SetMediaDataRef
  4191.             move.w              #$01C9,D0
  4192.             dc.w                $AAAA
  4193.         EndM
  4194.     ELSE
  4195.         IMPORT_CFM_FUNCTION SetMediaDataRef
  4196.     ENDIF
  4197.  
  4198. ;
  4199. ; pascal OSErr SetMediaDataRefAttributes(Media theMedia, short index, long dataRefAttributes)
  4200. ;
  4201.     IF ¬ GENERATINGCFM THEN
  4202.         Macro
  4203.         _SetMediaDataRefAttributes
  4204.             move.w              #$01CA,D0
  4205.             dc.w                $AAAA
  4206.         EndM
  4207.     ELSE
  4208.         IMPORT_CFM_FUNCTION SetMediaDataRefAttributes
  4209.     ENDIF
  4210.  
  4211. ;
  4212. ; pascal OSErr AddMediaDataRef(Media theMedia, short *index, Handle dataRef, OSType dataRefType)
  4213. ;
  4214.     IF ¬ GENERATINGCFM THEN
  4215.         Macro
  4216.         _AddMediaDataRef
  4217.             move.w              #$0198,D0
  4218.             dc.w                $AAAA
  4219.         EndM
  4220.     ELSE
  4221.         IMPORT_CFM_FUNCTION AddMediaDataRef
  4222.     ENDIF
  4223.  
  4224. ;
  4225. ; pascal OSErr GetMediaDataRefCount(Media theMedia, short *count)
  4226. ;
  4227.     IF ¬ GENERATINGCFM THEN
  4228.         Macro
  4229.         _GetMediaDataRefCount
  4230.             move.w              #$0199,D0
  4231.             dc.w                $AAAA
  4232.         EndM
  4233.     ELSE
  4234.         IMPORT_CFM_FUNCTION GetMediaDataRefCount
  4235.     ENDIF
  4236.  
  4237. ;
  4238. ;****
  4239. ;    Playback hint routines
  4240. ;****
  4241. ;
  4242. ;
  4243. ; pascal void SetMoviePlayHints(Movie theMovie, long flags, long flagsMask)
  4244. ;
  4245.     IF ¬ GENERATINGCFM THEN
  4246.         Macro
  4247.         _SetMoviePlayHints
  4248.             move.w              #$01A1,D0
  4249.             dc.w                $AAAA
  4250.         EndM
  4251.     ELSE
  4252.         IMPORT_CFM_FUNCTION SetMoviePlayHints
  4253.     ENDIF
  4254.  
  4255. ;
  4256. ; pascal void SetMediaPlayHints(Media theMedia, long flags, long flagsMask)
  4257. ;
  4258.     IF ¬ GENERATINGCFM THEN
  4259.         Macro
  4260.         _SetMediaPlayHints
  4261.             move.w              #$01A2,D0
  4262.             dc.w                $AAAA
  4263.         EndM
  4264.     ELSE
  4265.         IMPORT_CFM_FUNCTION SetMediaPlayHints
  4266.     ENDIF
  4267.  
  4268. ;
  4269. ;****
  4270. ;    Load time track hints
  4271. ;****
  4272. ;
  4273.  
  4274. preloadAlways                    EQU        $00000001
  4275. preloadOnlyIfEnabled            EQU        $00000002
  4276. ;
  4277. ; pascal void SetTrackLoadSettings(Track theTrack, TimeValue preloadTime, TimeValue preloadDuration, long preloadFlags, long defaultHints)
  4278. ;
  4279.     IF ¬ GENERATINGCFM THEN
  4280.         Macro
  4281.         _SetTrackLoadSettings
  4282.             move.w              #$01E3,D0
  4283.             dc.w                $AAAA
  4284.         EndM
  4285.     ELSE
  4286.         IMPORT_CFM_FUNCTION SetTrackLoadSettings
  4287.     ENDIF
  4288.  
  4289. ;
  4290. ; pascal void GetTrackLoadSettings(Track theTrack, TimeValue *preloadTime, TimeValue *preloadDuration, long *preloadFlags, long *defaultHints)
  4291. ;
  4292.     IF ¬ GENERATINGCFM THEN
  4293.         Macro
  4294.         _GetTrackLoadSettings
  4295.             move.w              #$01E4,D0
  4296.             dc.w                $AAAA
  4297.         EndM
  4298.     ELSE
  4299.         IMPORT_CFM_FUNCTION GetTrackLoadSettings
  4300.     ENDIF
  4301.  
  4302. ;
  4303. ;****
  4304. ;    Big screen TV
  4305. ;****
  4306. ;
  4307.  
  4308. fullScreenHideCursor            EQU        $00000001
  4309. fullScreenAllowEvents            EQU        $00000002
  4310. fullScreenDontChangeMenuBar        EQU        $00000004
  4311. fullScreenPreflightSize            EQU        $00000008
  4312. ;
  4313. ; pascal OSErr BeginFullScreen(Ptr *restoreState, GDHandle whichGD, short *desiredWidth, short *desiredHeight, WindowPtr *newWindow, RGBColor *eraseColor, long flags)
  4314. ;
  4315.     IF ¬ GENERATINGCFM THEN
  4316.         Macro
  4317.         _BeginFullScreen
  4318.             move.w              #$0233,D0
  4319.             dc.w                $AAAA
  4320.         EndM
  4321.     ELSE
  4322.         IMPORT_CFM_FUNCTION BeginFullScreen
  4323.     ENDIF
  4324.  
  4325. ;
  4326. ; pascal OSErr EndFullScreen(Ptr fullState, long flags)
  4327. ;
  4328.     IF ¬ GENERATINGCFM THEN
  4329.         Macro
  4330.         _EndFullScreen
  4331.             move.w              #$0234,D0
  4332.             dc.w                $AAAA
  4333.         EndM
  4334.     ELSE
  4335.         IMPORT_CFM_FUNCTION EndFullScreen
  4336.     ENDIF
  4337.  
  4338. ;
  4339. ;****
  4340. ;    Sprite Toolbox
  4341. ;****
  4342. ;
  4343.  
  4344. kBackgroundSpriteLayerNum        EQU        32767
  4345. ;   Sprite Properties
  4346.  
  4347. kSpritePropertyMatrix            EQU        1
  4348. kSpritePropertyImageDescription    EQU        2
  4349. kSpritePropertyImageDataPtr        EQU        3
  4350. kSpritePropertyVisible            EQU        4
  4351. kSpritePropertyLayer            EQU        5
  4352. kSpritePropertyImageIndex        EQU        100
  4353. kSpriteTrackPropertyBackgroundColor EQU    101
  4354. kSpriteTrackPropertyOffscreenBitDepth EQU 102
  4355. kSpriteTrackPropertySampleFormat EQU    103
  4356. ;  flagsIn for SpriteWorldIdle
  4357.  
  4358. kOnlyDrawToSpriteWorld            EQU        $00000001
  4359. ;  flagsOut for SpriteWorldIdle
  4360.  
  4361. kSpriteWorldDidDraw                EQU        $00000001
  4362. ;  flags for sprite track sample format
  4363.  
  4364. kKeyFrameAndSingleOverride        EQU        $00000002
  4365. kKeyFrameAndAllOverrides        EQU        $00000004
  4366. ;
  4367. ; pascal OSErr NewSpriteWorld(SpriteWorld *newSpriteWorld, GWorldPtr destination, GWorldPtr spriteLayer, RGBColor *backgroundColor, GWorldPtr background)
  4368. ;
  4369.     IF ¬ GENERATINGCFM THEN
  4370.         Macro
  4371.         _NewSpriteWorld
  4372.             move.w              #$0239,D0
  4373.             dc.w                $AAAA
  4374.         EndM
  4375.     ELSE
  4376.         IMPORT_CFM_FUNCTION NewSpriteWorld
  4377.     ENDIF
  4378.  
  4379. ;
  4380. ; pascal void DisposeSpriteWorld(SpriteWorld theSpriteWorld)
  4381. ;
  4382.     IF ¬ GENERATINGCFM THEN
  4383.         Macro
  4384.         _DisposeSpriteWorld
  4385.             move.w              #$023A,D0
  4386.             dc.w                $AAAA
  4387.         EndM
  4388.     ELSE
  4389.         IMPORT_CFM_FUNCTION DisposeSpriteWorld
  4390.     ENDIF
  4391.  
  4392. ;
  4393. ; pascal OSErr SetSpriteWorldClip(SpriteWorld theSpriteWorld, RgnHandle clipRgn)
  4394. ;
  4395.     IF ¬ GENERATINGCFM THEN
  4396.         Macro
  4397.         _SetSpriteWorldClip
  4398.             move.w              #$023B,D0
  4399.             dc.w                $AAAA
  4400.         EndM
  4401.     ELSE
  4402.         IMPORT_CFM_FUNCTION SetSpriteWorldClip
  4403.     ENDIF
  4404.  
  4405. ;
  4406. ; pascal OSErr SetSpriteWorldMatrix(SpriteWorld theSpriteWorld, const MatrixRecord *matrix)
  4407. ;
  4408.     IF ¬ GENERATINGCFM THEN
  4409.         Macro
  4410.         _SetSpriteWorldMatrix
  4411.             move.w              #$023C,D0
  4412.             dc.w                $AAAA
  4413.         EndM
  4414.     ELSE
  4415.         IMPORT_CFM_FUNCTION SetSpriteWorldMatrix
  4416.     ENDIF
  4417.  
  4418. ;
  4419. ; pascal OSErr SpriteWorldIdle(SpriteWorld theSpriteWorld, long flagsIn, long *flagsOut)
  4420. ;
  4421.     IF ¬ GENERATINGCFM THEN
  4422.         Macro
  4423.         _SpriteWorldIdle
  4424.             move.w              #$023D,D0
  4425.             dc.w                $AAAA
  4426.         EndM
  4427.     ELSE
  4428.         IMPORT_CFM_FUNCTION SpriteWorldIdle
  4429.     ENDIF
  4430.  
  4431. ;
  4432. ; pascal OSErr InvalidateSpriteWorld(SpriteWorld theSpriteWorld, Rect *invalidArea)
  4433. ;
  4434.     IF ¬ GENERATINGCFM THEN
  4435.         Macro
  4436.         _InvalidateSpriteWorld
  4437.             move.w              #$023E,D0
  4438.             dc.w                $AAAA
  4439.         EndM
  4440.     ELSE
  4441.         IMPORT_CFM_FUNCTION InvalidateSpriteWorld
  4442.     ENDIF
  4443.  
  4444. ;
  4445. ; pascal OSErr SpriteWorldHitTest(SpriteWorld theSpriteWorld, long flags, Point loc, Sprite *spriteHit)
  4446. ;
  4447.     IF ¬ GENERATINGCFM THEN
  4448.         Macro
  4449.         _SpriteWorldHitTest
  4450.             move.w              #$0246,D0
  4451.             dc.w                $AAAA
  4452.         EndM
  4453.     ELSE
  4454.         IMPORT_CFM_FUNCTION SpriteWorldHitTest
  4455.     ENDIF
  4456.  
  4457. ;
  4458. ; pascal OSErr SpriteHitTest(Sprite theSprite, long flags, Point loc, Boolean *wasHit)
  4459. ;
  4460.     IF ¬ GENERATINGCFM THEN
  4461.         Macro
  4462.         _SpriteHitTest
  4463.             move.w              #$0247,D0
  4464.             dc.w                $AAAA
  4465.         EndM
  4466.     ELSE
  4467.         IMPORT_CFM_FUNCTION SpriteHitTest
  4468.     ENDIF
  4469.  
  4470. ;
  4471. ; pascal void DisposeAllSprites(SpriteWorld theSpriteWorld)
  4472. ;
  4473.     IF ¬ GENERATINGCFM THEN
  4474.         Macro
  4475.         _DisposeAllSprites
  4476.             move.w              #$023F,D0
  4477.             dc.w                $AAAA
  4478.         EndM
  4479.     ELSE
  4480.         IMPORT_CFM_FUNCTION DisposeAllSprites
  4481.     ENDIF
  4482.  
  4483. ;
  4484. ; pascal OSErr NewSprite(Sprite *newSprite, SpriteWorld itsSpriteWorld, ImageDescriptionHandle idh, Ptr imageDataPtr, MatrixRecord *matrix, Boolean visible, short layer)
  4485. ;
  4486.     IF ¬ GENERATINGCFM THEN
  4487.         Macro
  4488.         _NewSprite
  4489.             move.w              #$0240,D0
  4490.             dc.w                $AAAA
  4491.         EndM
  4492.     ELSE
  4493.         IMPORT_CFM_FUNCTION NewSprite
  4494.     ENDIF
  4495.  
  4496. ;
  4497. ; pascal void DisposeSprite(Sprite theSprite)
  4498. ;
  4499.     IF ¬ GENERATINGCFM THEN
  4500.         Macro
  4501.         _DisposeSprite
  4502.             move.w              #$0241,D0
  4503.             dc.w                $AAAA
  4504.         EndM
  4505.     ELSE
  4506.         IMPORT_CFM_FUNCTION DisposeSprite
  4507.     ENDIF
  4508.  
  4509. ;
  4510. ; pascal void InvalidateSprite(Sprite theSprite)
  4511. ;
  4512.     IF ¬ GENERATINGCFM THEN
  4513.         Macro
  4514.         _InvalidateSprite
  4515.             move.w              #$0242,D0
  4516.             dc.w                $AAAA
  4517.         EndM
  4518.     ELSE
  4519.         IMPORT_CFM_FUNCTION InvalidateSprite
  4520.     ENDIF
  4521.  
  4522. ;
  4523. ; pascal OSErr SetSpriteProperty(Sprite theSprite, long propertyType, void *propertyValue)
  4524. ;
  4525.     IF ¬ GENERATINGCFM THEN
  4526.         Macro
  4527.         _SetSpriteProperty
  4528.             move.w              #$0243,D0
  4529.             dc.w                $AAAA
  4530.         EndM
  4531.     ELSE
  4532.         IMPORT_CFM_FUNCTION SetSpriteProperty
  4533.     ENDIF
  4534.  
  4535. ;
  4536. ; pascal OSErr GetSpriteProperty(Sprite theSprite, long propertyType, void *propertyValue)
  4537. ;
  4538.     IF ¬ GENERATINGCFM THEN
  4539.         Macro
  4540.         _GetSpriteProperty
  4541.             move.w              #$0244,D0
  4542.             dc.w                $AAAA
  4543.         EndM
  4544.     ELSE
  4545.         IMPORT_CFM_FUNCTION GetSpriteProperty
  4546.     ENDIF
  4547.  
  4548. ;
  4549. ;****
  4550. ;    QT Atom Data Support
  4551. ;****
  4552. ;
  4553.  
  4554. kParentAtomIsContainer            EQU        0
  4555. ;  create and dispose QTAtomContainer objects
  4556. ;
  4557. ; pascal OSErr QTNewAtomContainer(QTAtomContainer *atomData)
  4558. ;
  4559.     IF ¬ GENERATINGCFM THEN
  4560.         Macro
  4561.         _QTNewAtomContainer
  4562.             move.w              #$020C,D0
  4563.             dc.w                $AAAA
  4564.         EndM
  4565.     ELSE
  4566.         IMPORT_CFM_FUNCTION QTNewAtomContainer
  4567.     ENDIF
  4568.  
  4569. ;
  4570. ; pascal OSErr QTDisposeAtomContainer(QTAtomContainer atomData)
  4571. ;
  4572.     IF ¬ GENERATINGCFM THEN
  4573.         Macro
  4574.         _QTDisposeAtomContainer
  4575.             move.w              #$020D,D0
  4576.             dc.w                $AAAA
  4577.         EndM
  4578.     ELSE
  4579.         IMPORT_CFM_FUNCTION QTDisposeAtomContainer
  4580.     ENDIF
  4581.  
  4582. ;  locating nested atoms within QTAtomContainer container
  4583. ;
  4584. ; pascal QTAtomType QTGetNextChildType(QTAtomContainer container, QTAtom parentAtom, QTAtomType currentChildType)
  4585. ;
  4586.     IF ¬ GENERATINGCFM THEN
  4587.         Macro
  4588.         _QTGetNextChildType
  4589.             move.w              #$020E,D0
  4590.             dc.w                $AAAA
  4591.         EndM
  4592.     ELSE
  4593.         IMPORT_CFM_FUNCTION QTGetNextChildType
  4594.     ENDIF
  4595.  
  4596. ;
  4597. ; pascal short QTCountChildrenOfType(QTAtomContainer container, QTAtom parentAtom, QTAtomType childType)
  4598. ;
  4599.     IF ¬ GENERATINGCFM THEN
  4600.         Macro
  4601.         _QTCountChildrenOfType
  4602.             move.w              #$020F,D0
  4603.             dc.w                $AAAA
  4604.         EndM
  4605.     ELSE
  4606.         IMPORT_CFM_FUNCTION QTCountChildrenOfType
  4607.     ENDIF
  4608.  
  4609. ;
  4610. ; pascal QTAtom QTFindChildByIndex(QTAtomContainer container, QTAtom parentAtom, QTAtomType atomType, short index, QTAtomID *id)
  4611. ;
  4612.     IF ¬ GENERATINGCFM THEN
  4613.         Macro
  4614.         _QTFindChildByIndex
  4615.             move.w              #$0210,D0
  4616.             dc.w                $AAAA
  4617.         EndM
  4618.     ELSE
  4619.         IMPORT_CFM_FUNCTION QTFindChildByIndex
  4620.     ENDIF
  4621.  
  4622. ;
  4623. ; pascal QTAtom QTFindChildByID(QTAtomContainer container, QTAtom parentAtom, QTAtomType atomType, QTAtomID id, short *index)
  4624. ;
  4625.     IF ¬ GENERATINGCFM THEN
  4626.         Macro
  4627.         _QTFindChildByID
  4628.             move.w              #$021D,D0
  4629.             dc.w                $AAAA
  4630.         EndM
  4631.     ELSE
  4632.         IMPORT_CFM_FUNCTION QTFindChildByID
  4633.     ENDIF
  4634.  
  4635. ;
  4636. ; pascal OSErr QTNextChildAnyType(QTAtomContainer container, QTAtom parentAtom, QTAtom currentChild, QTAtom *nextChild)
  4637. ;
  4638.     IF ¬ GENERATINGCFM THEN
  4639.         Macro
  4640.         _QTNextChildAnyType
  4641.             move.w              #$0200,D0
  4642.             dc.w                $AAAA
  4643.         EndM
  4644.     ELSE
  4645.         IMPORT_CFM_FUNCTION QTNextChildAnyType
  4646.     ENDIF
  4647.  
  4648. ;  set a leaf atom's data
  4649. ;
  4650. ; pascal OSErr QTSetAtomData(QTAtomContainer container, QTAtom atom, long dataSize, void *atomData)
  4651. ;
  4652.     IF ¬ GENERATINGCFM THEN
  4653.         Macro
  4654.         _QTSetAtomData
  4655.             move.w              #$0211,D0
  4656.             dc.w                $AAAA
  4657.         EndM
  4658.     ELSE
  4659.         IMPORT_CFM_FUNCTION QTSetAtomData
  4660.     ENDIF
  4661.  
  4662. ;  extracting data
  4663. ;
  4664. ; pascal OSErr QTCopyAtomDataToHandle(QTAtomContainer container, QTAtom atom, Handle targetHandle)
  4665. ;
  4666.     IF ¬ GENERATINGCFM THEN
  4667.         Macro
  4668.         _QTCopyAtomDataToHandle
  4669.             move.w              #$0212,D0
  4670.             dc.w                $AAAA
  4671.         EndM
  4672.     ELSE
  4673.         IMPORT_CFM_FUNCTION QTCopyAtomDataToHandle
  4674.     ENDIF
  4675.  
  4676. ;
  4677. ; pascal OSErr QTCopyAtomDataToPtr(QTAtomContainer container, QTAtom atom, Boolean sizeOrLessOK, long size, void *targetPtr, long *actualSize)
  4678. ;
  4679.     IF ¬ GENERATINGCFM THEN
  4680.         Macro
  4681.         _QTCopyAtomDataToPtr
  4682.             move.w              #$0213,D0
  4683.             dc.w                $AAAA
  4684.         EndM
  4685.     ELSE
  4686.         IMPORT_CFM_FUNCTION QTCopyAtomDataToPtr
  4687.     ENDIF
  4688.  
  4689. ;
  4690. ; pascal OSErr QTGetAtomTypeAndID(QTAtomContainer container, QTAtom atom, QTAtomType *atomType, QTAtomID *id)
  4691. ;
  4692.     IF ¬ GENERATINGCFM THEN
  4693.         Macro
  4694.         _QTGetAtomTypeAndID
  4695.             move.w              #$0232,D0
  4696.             dc.w                $AAAA
  4697.         EndM
  4698.     ELSE
  4699.         IMPORT_CFM_FUNCTION QTGetAtomTypeAndID
  4700.     ENDIF
  4701.  
  4702. ;  extract a copy of an atom and all of it's children, caller disposes
  4703. ;
  4704. ; pascal OSErr QTCopyAtom(QTAtomContainer container, QTAtom atom, QTAtomContainer *targetContainer)
  4705. ;
  4706.     IF ¬ GENERATINGCFM THEN
  4707.         Macro
  4708.         _QTCopyAtom
  4709.             move.w              #$0214,D0
  4710.             dc.w                $AAAA
  4711.         EndM
  4712.     ELSE
  4713.         IMPORT_CFM_FUNCTION QTCopyAtom
  4714.     ENDIF
  4715.  
  4716. ;  obtaining direct reference to atom data
  4717. ;
  4718. ; pascal OSErr QTLockContainer(QTAtomContainer container)
  4719. ;
  4720.     IF ¬ GENERATINGCFM THEN
  4721.         Macro
  4722.         _QTLockContainer
  4723.             move.w              #$0215,D0
  4724.             dc.w                $AAAA
  4725.         EndM
  4726.     ELSE
  4727.         IMPORT_CFM_FUNCTION QTLockContainer
  4728.     ENDIF
  4729.  
  4730. ;
  4731. ; pascal OSErr QTGetAtomDataPtr(QTAtomContainer container, QTAtom atom, long *dataSize, Ptr *atomData)
  4732. ;
  4733.     IF ¬ GENERATINGCFM THEN
  4734.         Macro
  4735.         _QTGetAtomDataPtr
  4736.             move.w              #$0216,D0
  4737.             dc.w                $AAAA
  4738.         EndM
  4739.     ELSE
  4740.         IMPORT_CFM_FUNCTION QTGetAtomDataPtr
  4741.     ENDIF
  4742.  
  4743. ;
  4744. ; pascal OSErr QTUnlockContainer(QTAtomContainer container)
  4745. ;
  4746.     IF ¬ GENERATINGCFM THEN
  4747.         Macro
  4748.         _QTUnlockContainer
  4749.             move.w              #$0217,D0
  4750.             dc.w                $AAAA
  4751.         EndM
  4752.     ELSE
  4753.         IMPORT_CFM_FUNCTION QTUnlockContainer
  4754.     ENDIF
  4755.  
  4756. ;
  4757. ; building QTAtomContainer trees
  4758. ; creates and inserts new atom at specified index, existing atoms at or after index are moved toward end of list
  4759. ; used for Top-Down tree creation
  4760. ;
  4761. ;
  4762. ; pascal OSErr QTInsertChild(QTAtomContainer container, QTAtom parentAtom, QTAtomType atomType, QTAtomID id, short index, long dataSize, void *data, QTAtom *newAtom)
  4763. ;
  4764.     IF ¬ GENERATINGCFM THEN
  4765.         Macro
  4766.         _QTInsertChild
  4767.             move.w              #$0218,D0
  4768.             dc.w                $AAAA
  4769.         EndM
  4770.     ELSE
  4771.         IMPORT_CFM_FUNCTION QTInsertChild
  4772.     ENDIF
  4773.  
  4774. ;  inserts children from childrenContainer as children of parentAtom
  4775. ;
  4776. ; pascal OSErr QTInsertChildren(QTAtomContainer container, QTAtom parentAtom, QTAtomContainer childrenContainer)
  4777. ;
  4778.     IF ¬ GENERATINGCFM THEN
  4779.         Macro
  4780.         _QTInsertChildren
  4781.             move.w              #$0219,D0
  4782.             dc.w                $AAAA
  4783.         EndM
  4784.     ELSE
  4785.         IMPORT_CFM_FUNCTION QTInsertChildren
  4786.     ENDIF
  4787.  
  4788. ;  destruction
  4789. ;
  4790. ; pascal OSErr QTRemoveAtom(QTAtomContainer container, QTAtom atom)
  4791. ;
  4792.     IF ¬ GENERATINGCFM THEN
  4793.         Macro
  4794.         _QTRemoveAtom
  4795.             move.w              #$021A,D0
  4796.             dc.w                $AAAA
  4797.         EndM
  4798.     ELSE
  4799.         IMPORT_CFM_FUNCTION QTRemoveAtom
  4800.     ENDIF
  4801.  
  4802. ;
  4803. ; pascal OSErr QTRemoveChildren(QTAtomContainer container, QTAtom atom)
  4804. ;
  4805.     IF ¬ GENERATINGCFM THEN
  4806.         Macro
  4807.         _QTRemoveChildren
  4808.             move.w              #$021B,D0
  4809.             dc.w                $AAAA
  4810.         EndM
  4811.     ELSE
  4812.         IMPORT_CFM_FUNCTION QTRemoveChildren
  4813.     ENDIF
  4814.  
  4815. ;  replacement must be same type as target
  4816. ;
  4817. ; pascal OSErr QTReplaceAtom(QTAtomContainer targetContainer, QTAtom targetAtom, QTAtomContainer replacementContainer, QTAtom replacementAtom)
  4818. ;
  4819.     IF ¬ GENERATINGCFM THEN
  4820.         Macro
  4821.         _QTReplaceAtom
  4822.             move.w              #$021C,D0
  4823.             dc.w                $AAAA
  4824.         EndM
  4825.     ELSE
  4826.         IMPORT_CFM_FUNCTION QTReplaceAtom
  4827.     ENDIF
  4828.  
  4829. ;
  4830. ; pascal OSErr QTSwapAtoms(QTAtomContainer container, QTAtom atom1, QTAtom atom2)
  4831. ;
  4832.     IF ¬ GENERATINGCFM THEN
  4833.         Macro
  4834.         _QTSwapAtoms
  4835.             move.w              #$01FF,D0
  4836.             dc.w                $AAAA
  4837.         EndM
  4838.     ELSE
  4839.         IMPORT_CFM_FUNCTION QTSwapAtoms
  4840.     ENDIF
  4841.  
  4842. ;
  4843. ; pascal OSErr QTSetAtomID(QTAtomContainer container, QTAtom atom, QTAtomID newID)
  4844. ;
  4845.     IF ¬ GENERATINGCFM THEN
  4846.         Macro
  4847.         _QTSetAtomID
  4848.             move.w              #$0231,D0
  4849.             dc.w                $AAAA
  4850.         EndM
  4851.     ELSE
  4852.         IMPORT_CFM_FUNCTION QTSetAtomID
  4853.     ENDIF
  4854.  
  4855. ;
  4856. ; pascal OSErr SetMediaPropertyAtom(Media theMedia, QTAtomContainer propertyAtom)
  4857. ;
  4858.     IF ¬ GENERATINGCFM THEN
  4859.         Macro
  4860.         _SetMediaPropertyAtom
  4861.             move.w              #$022E,D0
  4862.             dc.w                $AAAA
  4863.         EndM
  4864.     ELSE
  4865.         IMPORT_CFM_FUNCTION SetMediaPropertyAtom
  4866.     ENDIF
  4867.  
  4868. ;
  4869. ; pascal OSErr GetMediaPropertyAtom(Media theMedia, QTAtomContainer *propertyAtom)
  4870. ;
  4871.     IF ¬ GENERATINGCFM THEN
  4872.         Macro
  4873.         _GetMediaPropertyAtom
  4874.             move.w              #$022F,D0
  4875.             dc.w                $AAAA
  4876.         EndM
  4877.     ELSE
  4878.         IMPORT_CFM_FUNCTION GetMediaPropertyAtom
  4879.     ENDIF
  4880.  
  4881.  
  4882. MovieControllerComponentType    EQU        'play'
  4883. ; typedef ComponentInstance             MovieController
  4884.  
  4885.  
  4886. mcActionIdle                    EQU        1                    ; no param
  4887. mcActionDraw                    EQU        2                    ; param is WindowPtr
  4888. mcActionActivate                EQU        3                    ; no param
  4889. mcActionDeactivate                EQU        4                    ; no param
  4890. mcActionMouseDown                EQU        5                    ; param is pointer to EventRecord
  4891. mcActionKey                        EQU        6                    ; param is pointer to EventRecord
  4892. mcActionPlay                    EQU        8                    ; param is Fixed, play rate
  4893. mcActionGoToTime                EQU        12                    ; param is TimeRecord
  4894. mcActionSetVolume                EQU        14                    ; param is a short
  4895. mcActionGetVolume                EQU        15                    ; param is pointer to a short
  4896. mcActionStep                    EQU        18                    ; param is number of steps (short)
  4897. mcActionSetLooping                EQU        21                    ; param is Boolean
  4898. mcActionGetLooping                EQU        22                    ; param is pointer to a Boolean
  4899. mcActionSetLoopIsPalindrome        EQU        23                    ; param is Boolean
  4900. mcActionGetLoopIsPalindrome        EQU        24                    ; param is pointer to a Boolean
  4901. mcActionSetGrowBoxBounds        EQU        25                    ; param is a Rect
  4902. mcActionControllerSizeChanged    EQU        26                    ; no param
  4903. mcActionSetSelectionBegin        EQU        29                    ; param is TimeRecord
  4904. mcActionSetSelectionDuration    EQU        30                    ; param is TimeRecord, action only taken on set-duration
  4905. mcActionSetKeysEnabled            EQU        32                    ; param is Boolean
  4906. mcActionGetKeysEnabled            EQU        33                    ; param is pointer to Boolean
  4907. mcActionSetPlaySelection        EQU        34                    ; param is Boolean
  4908. mcActionGetPlaySelection        EQU        35                    ; param is pointer to Boolean
  4909. mcActionSetUseBadge                EQU        36                    ; param is Boolean
  4910. mcActionGetUseBadge                EQU        37                    ; param is pointer to Boolean
  4911. mcActionSetFlags                EQU        38                    ; param is long of flags
  4912. mcActionGetFlags                EQU        39                    ; param is pointer to a long of flags
  4913. mcActionSetPlayEveryFrame        EQU        40                    ; param is Boolean
  4914. mcActionGetPlayEveryFrame        EQU        41                    ; param is pointer to Boolean
  4915. mcActionGetPlayRate                EQU        42                    ; param is pointer to Fixed
  4916. mcActionShowBalloon                EQU        43                    ; param is a pointer to a boolean. set to false to stop balloon
  4917. mcActionBadgeClick                EQU        44                    ; param is pointer to Boolean. set to false to ignore click
  4918. mcActionMovieClick                EQU        45                    ; param is pointer to event record. change “what” to nullEvt to kill click
  4919. mcActionSuspend                    EQU        46                    ; no param
  4920. mcActionResume                    EQU        47                    ; no param
  4921. mcActionSetControllerKeysEnabled EQU    48                    ; param is Boolean
  4922. mcActionGetTimeSliderRect        EQU        49                    ; param is pointer to rect
  4923. mcActionMovieEdited                EQU        50                    ; no param
  4924. mcActionGetDragEnabled            EQU        51                    ; param is pointer to Boolean
  4925. mcActionSetDragEnabled            EQU        52                    ; param is Boolean
  4926. mcActionGetSelectionBegin        EQU        53                    ; param is TimeRecord
  4927. mcActionGetSelectionDuration    EQU        54                    ; param is TimeRecord
  4928. mcActionPrerollAndPlay            EQU        55                    ; param is Fixed, play rate
  4929. mcActionGetCursorSettingEnabled    EQU        56                    ; param is pointer to Boolean
  4930. mcActionSetCursorSettingEnabled    EQU        57                    ; param is Boolean
  4931. ; typedef short                         mcAction
  4932.  
  4933.  
  4934. mcFlagSuppressMovieFrame        EQU        $01
  4935. mcFlagSuppressStepButtons        EQU        $02
  4936. mcFlagSuppressSpeakerButton        EQU        $04
  4937. mcFlagsUseWindowPalette            EQU        $08
  4938. mcFlagsDontInvalidate            EQU        $10
  4939.  
  4940. mcPositionDontInvalidate        EQU        $20
  4941. ; typedef unsigned long                 mcFlags
  4942.  
  4943. ;
  4944. ;    menu related stuff
  4945. ;
  4946.  
  4947. mcInfoUndoAvailable                EQU        $01
  4948. mcInfoCutAvailable                EQU        $02
  4949. mcInfoCopyAvailable                EQU        $04
  4950. mcInfoPasteAvailable            EQU        $08
  4951. mcInfoClearAvailable            EQU        $10
  4952. mcInfoHasSound                    EQU        $20
  4953. mcInfoIsPlaying                    EQU        $40
  4954. mcInfoIsLooping                    EQU        $80
  4955. mcInfoIsInPalindrome            EQU        $0100
  4956. mcInfoEditingEnabled            EQU        $0200
  4957. mcInfoMovieIsInteractive        EQU        $0400
  4958. ;  menu item codes
  4959.  
  4960. mcMenuUndo                        EQU        1
  4961. mcMenuCut                        EQU        3
  4962. mcMenuCopy                        EQU        4
  4963. mcMenuPaste                        EQU        5
  4964. mcMenuClear                        EQU        6
  4965. ;  target management 
  4966. ;
  4967. ; pascal ComponentResult MCSetMovie(MovieController mc, Movie theMovie, WindowPtr movieWindow, Point where)
  4968. ;
  4969.     IF ¬ GENERATINGCFM THEN
  4970.         Macro
  4971.         _MCSetMovie
  4972.             move.l              #$000C0002,-(sp)
  4973.             moveq               #0,D0
  4974.             dc.w                $A82A
  4975.         EndM
  4976.     ELSE
  4977.         IMPORT_CFM_FUNCTION MCSetMovie
  4978.     ENDIF
  4979.  
  4980. ;
  4981. ; pascal Movie MCGetIndMovie(MovieController mc, short index)
  4982. ;
  4983.     IF ¬ GENERATINGCFM THEN
  4984.         Macro
  4985.         _MCGetIndMovie
  4986.             move.l              #$00020005,-(sp)
  4987.             moveq               #0,D0
  4988.             dc.w                $A82A
  4989.         EndM
  4990.     ELSE
  4991.         IMPORT_CFM_FUNCTION MCGetIndMovie
  4992.     ENDIF
  4993.  
  4994. ;
  4995. ; pascal Movie MCGetMovieExtended(MovieController mc, short index)
  4996. ;
  4997.     IF ¬ GENERATINGCFM THEN
  4998.         Macro
  4999.         _MCGetMovieExtended
  5000.             move.l              #$00020005,-(sp)
  5001.             moveq               #0,D0
  5002.             dc.w                $A82A
  5003.         EndM
  5004.     ELSE
  5005.         IMPORT_CFM_FUNCTION MCGetMovieExtended
  5006.     ENDIF
  5007.  
  5008. ;
  5009. ; pascal ComponentResult MCRemoveMovie(MovieController mc)
  5010. ;
  5011.     IF ¬ GENERATINGCFM THEN
  5012.         Macro
  5013.         _MCRemoveMovie
  5014.             move.l              #$00000006,-(sp)
  5015.             moveq               #0,D0
  5016.             dc.w                $A82A
  5017.         EndM
  5018.     ELSE
  5019.         IMPORT_CFM_FUNCTION MCRemoveMovie
  5020.     ENDIF
  5021.  
  5022. ;  event handling etc. 
  5023. ;
  5024. ; pascal ComponentResult MCIsPlayerEvent(MovieController mc, const EventRecord *e)
  5025. ;
  5026.     IF ¬ GENERATINGCFM THEN
  5027.         Macro
  5028.         _MCIsPlayerEvent
  5029.             move.l              #$00040007,-(sp)
  5030.             moveq               #0,D0
  5031.             dc.w                $A82A
  5032.         EndM
  5033.     ELSE
  5034.         IMPORT_CFM_FUNCTION MCIsPlayerEvent
  5035.     ENDIF
  5036.  
  5037. ;  obsolete. use MCSetActionFilterWithRefCon instead. 
  5038. ;
  5039. ; pascal ComponentResult MCSetActionFilter(MovieController mc, MCActionFilterUPP blob)
  5040. ;
  5041.     IF ¬ GENERATINGCFM THEN
  5042.         Macro
  5043.         _MCSetActionFilter
  5044.             move.l              #$00040008,-(sp)
  5045.             moveq               #0,D0
  5046.             dc.w                $A82A
  5047.         EndM
  5048.     ELSE
  5049.         IMPORT_CFM_FUNCTION MCSetActionFilter
  5050.     ENDIF
  5051.  
  5052. ;
  5053. ;    proc is of the form:
  5054. ;        Boolean userPlayerFilter(MovieController mc, short *action, void *params) =
  5055. ;    proc returns TRUE if it handles the action, FALSE if not
  5056. ;    action is passed as a VAR so that it could be changed by filter (ick)
  5057. ;    this is consistent with the current dialog manager stuff
  5058. ;    params is any potential parameters that go with the action <triple ick> 
  5059. ;        such as set playback rate to xxx.
  5060. ;
  5061. ;
  5062. ; pascal ComponentResult MCDoAction(MovieController mc, short action, void *params)
  5063. ;
  5064.     IF ¬ GENERATINGCFM THEN
  5065.         Macro
  5066.         _MCDoAction
  5067.             move.l              #$00060009,-(sp)
  5068.             moveq               #0,D0
  5069.             dc.w                $A82A
  5070.         EndM
  5071.     ELSE
  5072.         IMPORT_CFM_FUNCTION MCDoAction
  5073.     ENDIF
  5074.  
  5075. ;  state type things 
  5076. ;
  5077. ; pascal ComponentResult MCSetControllerAttached(MovieController mc, Boolean attach)
  5078. ;
  5079.     IF ¬ GENERATINGCFM THEN
  5080.         Macro
  5081.         _MCSetControllerAttached
  5082.             move.l              #$0002000A,-(sp)
  5083.             moveq               #0,D0
  5084.             dc.w                $A82A
  5085.         EndM
  5086.     ELSE
  5087.         IMPORT_CFM_FUNCTION MCSetControllerAttached
  5088.     ENDIF
  5089.  
  5090. ;
  5091. ; pascal ComponentResult MCIsControllerAttached(MovieController mc)
  5092. ;
  5093.     IF ¬ GENERATINGCFM THEN
  5094.         Macro
  5095.         _MCIsControllerAttached
  5096.             move.l              #$0000000B,-(sp)
  5097.             moveq               #0,D0
  5098.             dc.w                $A82A
  5099.         EndM
  5100.     ELSE
  5101.         IMPORT_CFM_FUNCTION MCIsControllerAttached
  5102.     ENDIF
  5103.  
  5104. ;
  5105. ; pascal ComponentResult MCSetControllerPort(MovieController mc, CGrafPtr gp)
  5106. ;
  5107.     IF ¬ GENERATINGCFM THEN
  5108.         Macro
  5109.         _MCSetControllerPort
  5110.             move.l              #$0004000C,-(sp)
  5111.             moveq               #0,D0
  5112.             dc.w                $A82A
  5113.         EndM
  5114.     ELSE
  5115.         IMPORT_CFM_FUNCTION MCSetControllerPort
  5116.     ENDIF
  5117.  
  5118. ;
  5119. ; pascal CGrafPtr MCGetControllerPort(MovieController mc)
  5120. ;
  5121.     IF ¬ GENERATINGCFM THEN
  5122.         Macro
  5123.         _MCGetControllerPort
  5124.             move.l              #$0000000D,-(sp)
  5125.             moveq               #0,D0
  5126.             dc.w                $A82A
  5127.         EndM
  5128.     ELSE
  5129.         IMPORT_CFM_FUNCTION MCGetControllerPort
  5130.     ENDIF
  5131.  
  5132. ;
  5133. ; pascal ComponentResult MCSetVisible(MovieController mc, Boolean visible)
  5134. ;
  5135.     IF ¬ GENERATINGCFM THEN
  5136.         Macro
  5137.         _MCSetVisible
  5138.             move.l              #$0002000E,-(sp)
  5139.             moveq               #0,D0
  5140.             dc.w                $A82A
  5141.         EndM
  5142.     ELSE
  5143.         IMPORT_CFM_FUNCTION MCSetVisible
  5144.     ENDIF
  5145.  
  5146. ;
  5147. ; pascal ComponentResult MCGetVisible(MovieController mc)
  5148. ;
  5149.     IF ¬ GENERATINGCFM THEN
  5150.         Macro
  5151.         _MCGetVisible
  5152.             move.l              #$0000000F,-(sp)
  5153.             moveq               #0,D0
  5154.             dc.w                $A82A
  5155.         EndM
  5156.     ELSE
  5157.         IMPORT_CFM_FUNCTION MCGetVisible
  5158.     ENDIF
  5159.  
  5160. ;
  5161. ; pascal ComponentResult MCGetControllerBoundsRect(MovieController mc, Rect *bounds)
  5162. ;
  5163.     IF ¬ GENERATINGCFM THEN
  5164.         Macro
  5165.         _MCGetControllerBoundsRect
  5166.             move.l              #$00040010,-(sp)
  5167.             moveq               #0,D0
  5168.             dc.w                $A82A
  5169.         EndM
  5170.     ELSE
  5171.         IMPORT_CFM_FUNCTION MCGetControllerBoundsRect
  5172.     ENDIF
  5173.  
  5174. ;
  5175. ; pascal ComponentResult MCSetControllerBoundsRect(MovieController mc, const Rect *bounds)
  5176. ;
  5177.     IF ¬ GENERATINGCFM THEN
  5178.         Macro
  5179.         _MCSetControllerBoundsRect
  5180.             move.l              #$00040011,-(sp)
  5181.             moveq               #0,D0
  5182.             dc.w                $A82A
  5183.         EndM
  5184.     ELSE
  5185.         IMPORT_CFM_FUNCTION MCSetControllerBoundsRect
  5186.     ENDIF
  5187.  
  5188. ;
  5189. ; pascal RgnHandle MCGetControllerBoundsRgn(MovieController mc)
  5190. ;
  5191.     IF ¬ GENERATINGCFM THEN
  5192.         Macro
  5193.         _MCGetControllerBoundsRgn
  5194.             move.l              #$00000012,-(sp)
  5195.             moveq               #0,D0
  5196.             dc.w                $A82A
  5197.         EndM
  5198.     ELSE
  5199.         IMPORT_CFM_FUNCTION MCGetControllerBoundsRgn
  5200.     ENDIF
  5201.  
  5202. ;
  5203. ; pascal RgnHandle MCGetWindowRgn(MovieController mc, WindowPtr w)
  5204. ;
  5205.     IF ¬ GENERATINGCFM THEN
  5206.         Macro
  5207.         _MCGetWindowRgn
  5208.             move.l              #$00040013,-(sp)
  5209.             moveq               #0,D0
  5210.             dc.w                $A82A
  5211.         EndM
  5212.     ELSE
  5213.         IMPORT_CFM_FUNCTION MCGetWindowRgn
  5214.     ENDIF
  5215.  
  5216. ;  other stuff 
  5217. ;
  5218. ; pascal ComponentResult MCMovieChanged(MovieController mc, Movie m)
  5219. ;
  5220.     IF ¬ GENERATINGCFM THEN
  5221.         Macro
  5222.         _MCMovieChanged
  5223.             move.l              #$00040014,-(sp)
  5224.             moveq               #0,D0
  5225.             dc.w                $A82A
  5226.         EndM
  5227.     ELSE
  5228.         IMPORT_CFM_FUNCTION MCMovieChanged
  5229.     ENDIF
  5230.  
  5231. ;
  5232. ;    called when the app has changed thing about the movie (like bounding rect) or rate. So that we
  5233. ;        can update our graphical (and internal) state accordingly.
  5234. ;
  5235. ;
  5236. ; pascal ComponentResult MCSetDuration(MovieController mc, TimeValue duration)
  5237. ;
  5238.     IF ¬ GENERATINGCFM THEN
  5239.         Macro
  5240.         _MCSetDuration
  5241.             move.l              #$00040015,-(sp)
  5242.             moveq               #0,D0
  5243.             dc.w                $A82A
  5244.         EndM
  5245.     ELSE
  5246.         IMPORT_CFM_FUNCTION MCSetDuration
  5247.     ENDIF
  5248.  
  5249. ;
  5250. ;    duration to use for time slider -- will be reset next time MCMovieChanged is called
  5251. ;        or MCSetMovie is called
  5252. ;
  5253. ;
  5254. ; pascal TimeValue MCGetCurrentTime(MovieController mc, TimeScale *scale)
  5255. ;
  5256.     IF ¬ GENERATINGCFM THEN
  5257.         Macro
  5258.         _MCGetCurrentTime
  5259.             move.l              #$00040016,-(sp)
  5260.             moveq               #0,D0
  5261.             dc.w                $A82A
  5262.         EndM
  5263.     ELSE
  5264.         IMPORT_CFM_FUNCTION MCGetCurrentTime
  5265.     ENDIF
  5266.  
  5267. ;
  5268. ;    returns the time value and the time scale it is on. if there are no movies, the
  5269. ;        time scale is passed back as 0. scale is an optional parameter
  5270. ;
  5271. ;
  5272. ;
  5273. ; pascal ComponentResult MCNewAttachedController(MovieController mc, Movie theMovie, WindowPtr w, Point where)
  5274. ;
  5275.     IF ¬ GENERATINGCFM THEN
  5276.         Macro
  5277.         _MCNewAttachedController
  5278.             move.l              #$000C0017,-(sp)
  5279.             moveq               #0,D0
  5280.             dc.w                $A82A
  5281.         EndM
  5282.     ELSE
  5283.         IMPORT_CFM_FUNCTION MCNewAttachedController
  5284.     ENDIF
  5285.  
  5286. ;
  5287. ;    makes m the only movie attached to the controller. makes the controller visible.
  5288. ;    the window and where parameters are passed a long to MCSetMovie and behave as
  5289. ;    described there
  5290. ;
  5291. ;
  5292. ; pascal ComponentResult MCDraw(MovieController mc, WindowPtr w)
  5293. ;
  5294.     IF ¬ GENERATINGCFM THEN
  5295.         Macro
  5296.         _MCDraw
  5297.             move.l              #$00040018,-(sp)
  5298.             moveq               #0,D0
  5299.             dc.w                $A82A
  5300.         EndM
  5301.     ELSE
  5302.         IMPORT_CFM_FUNCTION MCDraw
  5303.     ENDIF
  5304.  
  5305. ;
  5306. ; pascal ComponentResult MCActivate(MovieController mc, WindowPtr w, Boolean activate)
  5307. ;
  5308.     IF ¬ GENERATINGCFM THEN
  5309.         Macro
  5310.         _MCActivate
  5311.             move.l              #$00060019,-(sp)
  5312.             moveq               #0,D0
  5313.             dc.w                $A82A
  5314.         EndM
  5315.     ELSE
  5316.         IMPORT_CFM_FUNCTION MCActivate
  5317.     ENDIF
  5318.  
  5319. ;
  5320. ; pascal ComponentResult MCIdle(MovieController mc)
  5321. ;
  5322.     IF ¬ GENERATINGCFM THEN
  5323.         Macro
  5324.         _MCIdle
  5325.             move.l              #$0000001A,-(sp)
  5326.             moveq               #0,D0
  5327.             dc.w                $A82A
  5328.         EndM
  5329.     ELSE
  5330.         IMPORT_CFM_FUNCTION MCIdle
  5331.     ENDIF
  5332.  
  5333. ;
  5334. ; pascal ComponentResult MCKey(MovieController mc, SInt8 key, long modifiers)
  5335. ;
  5336.     IF ¬ GENERATINGCFM THEN
  5337.         Macro
  5338.         _MCKey
  5339.             move.l              #$0006001B,-(sp)
  5340.             moveq               #0,D0
  5341.             dc.w                $A82A
  5342.         EndM
  5343.     ELSE
  5344.         IMPORT_CFM_FUNCTION MCKey
  5345.     ENDIF
  5346.  
  5347. ;
  5348. ; pascal ComponentResult MCClick(MovieController mc, WindowPtr w, Point where, long when, long modifiers)
  5349. ;
  5350.     IF ¬ GENERATINGCFM THEN
  5351.         Macro
  5352.         _MCClick
  5353.             move.l              #$0010001C,-(sp)
  5354.             moveq               #0,D0
  5355.             dc.w                $A82A
  5356.         EndM
  5357.     ELSE
  5358.         IMPORT_CFM_FUNCTION MCClick
  5359.     ENDIF
  5360.  
  5361. ;
  5362. ;    calls for editing
  5363. ;
  5364. ;
  5365. ; pascal ComponentResult MCEnableEditing(MovieController mc, Boolean enabled)
  5366. ;
  5367.     IF ¬ GENERATINGCFM THEN
  5368.         Macro
  5369.         _MCEnableEditing
  5370.             move.l              #$0002001D,-(sp)
  5371.             moveq               #0,D0
  5372.             dc.w                $A82A
  5373.         EndM
  5374.     ELSE
  5375.         IMPORT_CFM_FUNCTION MCEnableEditing
  5376.     ENDIF
  5377.  
  5378. ;
  5379. ; pascal long MCIsEditingEnabled(MovieController mc)
  5380. ;
  5381.     IF ¬ GENERATINGCFM THEN
  5382.         Macro
  5383.         _MCIsEditingEnabled
  5384.             move.l              #$0000001E,-(sp)
  5385.             moveq               #0,D0
  5386.             dc.w                $A82A
  5387.         EndM
  5388.     ELSE
  5389.         IMPORT_CFM_FUNCTION MCIsEditingEnabled
  5390.     ENDIF
  5391.  
  5392. ;
  5393. ; pascal Movie MCCopy(MovieController mc)
  5394. ;
  5395.     IF ¬ GENERATINGCFM THEN
  5396.         Macro
  5397.         _MCCopy
  5398.             move.l              #$0000001F,-(sp)
  5399.             moveq               #0,D0
  5400.             dc.w                $A82A
  5401.         EndM
  5402.     ELSE
  5403.         IMPORT_CFM_FUNCTION MCCopy
  5404.     ENDIF
  5405.  
  5406. ;
  5407. ; pascal Movie MCCut(MovieController mc)
  5408. ;
  5409.     IF ¬ GENERATINGCFM THEN
  5410.         Macro
  5411.         _MCCut
  5412.             move.l              #$00000020,-(sp)
  5413.             moveq               #0,D0
  5414.             dc.w                $A82A
  5415.         EndM
  5416.     ELSE
  5417.         IMPORT_CFM_FUNCTION MCCut
  5418.     ENDIF
  5419.  
  5420. ;
  5421. ; pascal ComponentResult MCPaste(MovieController mc, Movie srcMovie)
  5422. ;
  5423.     IF ¬ GENERATINGCFM THEN
  5424.         Macro
  5425.         _MCPaste
  5426.             move.l              #$00040021,-(sp)
  5427.             moveq               #0,D0
  5428.             dc.w                $A82A
  5429.         EndM
  5430.     ELSE
  5431.         IMPORT_CFM_FUNCTION MCPaste
  5432.     ENDIF
  5433.  
  5434. ;
  5435. ; pascal ComponentResult MCClear(MovieController mc)
  5436. ;
  5437.     IF ¬ GENERATINGCFM THEN
  5438.         Macro
  5439.         _MCClear
  5440.             move.l              #$00000022,-(sp)
  5441.             moveq               #0,D0
  5442.             dc.w                $A82A
  5443.         EndM
  5444.     ELSE
  5445.         IMPORT_CFM_FUNCTION MCClear
  5446.     ENDIF
  5447.  
  5448. ;
  5449. ; pascal ComponentResult MCUndo(MovieController mc)
  5450. ;
  5451.     IF ¬ GENERATINGCFM THEN
  5452.         Macro
  5453.         _MCUndo
  5454.             move.l              #$00000023,-(sp)
  5455.             moveq               #0,D0
  5456.             dc.w                $A82A
  5457.         EndM
  5458.     ELSE
  5459.         IMPORT_CFM_FUNCTION MCUndo
  5460.     ENDIF
  5461.  
  5462. ;
  5463. ; *    somewhat special stuff
  5464. ;
  5465. ;
  5466. ; pascal ComponentResult MCPositionController(MovieController mc, const Rect *movieRect, const Rect *controllerRect, long someFlags)
  5467. ;
  5468.     IF ¬ GENERATINGCFM THEN
  5469.         Macro
  5470.         _MCPositionController
  5471.             move.l              #$000C0024,-(sp)
  5472.             moveq               #0,D0
  5473.             dc.w                $A82A
  5474.         EndM
  5475.     ELSE
  5476.         IMPORT_CFM_FUNCTION MCPositionController
  5477.     ENDIF
  5478.  
  5479. ;
  5480. ; pascal ComponentResult MCGetControllerInfo(MovieController mc, long *someFlags)
  5481. ;
  5482.     IF ¬ GENERATINGCFM THEN
  5483.         Macro
  5484.         _MCGetControllerInfo
  5485.             move.l              #$00040025,-(sp)
  5486.             moveq               #0,D0
  5487.             dc.w                $A82A
  5488.         EndM
  5489.     ELSE
  5490.         IMPORT_CFM_FUNCTION MCGetControllerInfo
  5491.     ENDIF
  5492.  
  5493. ;
  5494. ; pascal ComponentResult MCSetClip(MovieController mc, RgnHandle theClip, RgnHandle movieClip)
  5495. ;
  5496.     IF ¬ GENERATINGCFM THEN
  5497.         Macro
  5498.         _MCSetClip
  5499.             move.l              #$00080028,-(sp)
  5500.             moveq               #0,D0
  5501.             dc.w                $A82A
  5502.         EndM
  5503.     ELSE
  5504.         IMPORT_CFM_FUNCTION MCSetClip
  5505.     ENDIF
  5506.  
  5507. ;
  5508. ; pascal ComponentResult MCGetClip(MovieController mc, RgnHandle *theClip, RgnHandle *movieClip)
  5509. ;
  5510.     IF ¬ GENERATINGCFM THEN
  5511.         Macro
  5512.         _MCGetClip
  5513.             move.l              #$00080029,-(sp)
  5514.             moveq               #0,D0
  5515.             dc.w                $A82A
  5516.         EndM
  5517.     ELSE
  5518.         IMPORT_CFM_FUNCTION MCGetClip
  5519.     ENDIF
  5520.  
  5521. ;
  5522. ; pascal ComponentResult MCDrawBadge(MovieController mc, RgnHandle movieRgn, RgnHandle *badgeRgn)
  5523. ;
  5524.     IF ¬ GENERATINGCFM THEN
  5525.         Macro
  5526.         _MCDrawBadge
  5527.             move.l              #$0008002A,-(sp)
  5528.             moveq               #0,D0
  5529.             dc.w                $A82A
  5530.         EndM
  5531.     ELSE
  5532.         IMPORT_CFM_FUNCTION MCDrawBadge
  5533.     ENDIF
  5534.  
  5535.     ENDIF
  5536.     IF FOR_SYSTEM7_AND_SYSTEM8_DEPRECATED THEN
  5537. ;
  5538. ; pascal ComponentResult MCSetUpEditMenu(MovieController mc, long modifiers, MenuHandle mh)
  5539. ;
  5540.     IF ¬ GENERATINGCFM THEN
  5541.         Macro
  5542.         _MCSetUpEditMenu
  5543.             move.l              #$0008002B,-(sp)
  5544.             moveq               #0,D0
  5545.             dc.w                $A82A
  5546.         EndM
  5547.     ELSE
  5548.         IMPORT_CFM_FUNCTION MCSetUpEditMenu
  5549.     ENDIF
  5550.  
  5551.     ENDIF
  5552.     IF FOR_SYSTEM7_AND_SYSTEM8_COOPERATIVE THEN
  5553. ;
  5554. ; pascal ComponentResult MCGetMenuString(MovieController mc, long modifiers, short item, Str255 aString)
  5555. ;
  5556.     IF ¬ GENERATINGCFM THEN
  5557.         Macro
  5558.         _MCGetMenuString
  5559.             move.l              #$000A002C,-(sp)
  5560.             moveq               #0,D0
  5561.             dc.w                $A82A
  5562.         EndM
  5563.     ELSE
  5564.         IMPORT_CFM_FUNCTION MCGetMenuString
  5565.     ENDIF
  5566.  
  5567. ;
  5568. ; pascal ComponentResult MCSetActionFilterWithRefCon(MovieController mc, MCActionFilterWithRefConUPP blob, long refCon)
  5569. ;
  5570.     IF ¬ GENERATINGCFM THEN
  5571.         Macro
  5572.         _MCSetActionFilterWithRefCon
  5573.             move.l              #$0008002D,-(sp)
  5574.             moveq               #0,D0
  5575.             dc.w                $A82A
  5576.         EndM
  5577.     ELSE
  5578.         IMPORT_CFM_FUNCTION MCSetActionFilterWithRefCon
  5579.     ENDIF
  5580.  
  5581. ;
  5582. ; pascal ComponentResult MCPtInController(MovieController mc, Point thePt, Boolean *inController)
  5583. ;
  5584.     IF ¬ GENERATINGCFM THEN
  5585.         Macro
  5586.         _MCPtInController
  5587.             move.l              #$0008002E,-(sp)
  5588.             moveq               #0,D0
  5589.             dc.w                $A82A
  5590.         EndM
  5591.     ELSE
  5592.         IMPORT_CFM_FUNCTION MCPtInController
  5593.     ENDIF
  5594.  
  5595.  
  5596. kMCSetMovieSelect                EQU        $02
  5597. kMCGetIndMovieSelect            EQU        $05
  5598. kMCGetMovieExtendedSelect        EQU        $05
  5599. kMCRemoveMovieSelect            EQU        $06
  5600. kMCIsPlayerEventSelect            EQU        $07
  5601. kMCSetActionFilterSelect        EQU        $08
  5602. kMCDoActionSelect                EQU        $09
  5603. kMCSetControllerAttachedSelect    EQU        $0A
  5604. kMCIsControllerAttachedSelect    EQU        $0B
  5605. kMCSetControllerPortSelect        EQU        $0C
  5606. kMCGetControllerPortSelect        EQU        $0D
  5607. kMCSetVisibleSelect                EQU        $0E
  5608. kMCGetVisibleSelect                EQU        $0F
  5609. kMCGetControllerBoundsRectSelect EQU    $10
  5610. kMCSetControllerBoundsRectSelect EQU    $11
  5611. kMCGetControllerBoundsRgnSelect    EQU        $12
  5612. kMCGetWindowRgnSelect            EQU        $13
  5613. kMCMovieChangedSelect            EQU        $14
  5614. kMCSetDurationSelect            EQU        $15
  5615. kMCGetCurrentTimeSelect            EQU        $16
  5616. kMCNewAttachedControllerSelect    EQU        $17
  5617. kMCDrawSelect                    EQU        $18
  5618. kMCActivateSelect                EQU        $19
  5619. kMCIdleSelect                    EQU        $1A
  5620. kMCKeySelect                    EQU        $1B
  5621. kMCClickSelect                    EQU        $1C
  5622. kMCEnableEditingSelect            EQU        $1D
  5623. kMCIsEditingEnabledSelect        EQU        $1E
  5624. kMCCopySelect                    EQU        $1F
  5625. kMCCutSelect                    EQU        $20
  5626. kMCPasteSelect                    EQU        $21
  5627. kMCClearSelect                    EQU        $22
  5628. kMCUndoSelect                    EQU        $23
  5629. kMCPositionControllerSelect        EQU        $24
  5630. kMCGetControllerInfoSelect        EQU        $25
  5631. kMCSetClipSelect                EQU        $28
  5632. kMCGetClipSelect                EQU        $29
  5633. kMCDrawBadgeSelect                EQU        $2A
  5634. kMCSetUpEditMenuSelect            EQU        $2B
  5635. kMCGetMenuStringSelect            EQU        $2C
  5636. kMCSetActionFilterWithRefConSelect EQU    $2D
  5637. kMCPtInControllerSelect            EQU        $2E
  5638. ;
  5639. ;***************************************
  5640. ;*                                        *
  5641. ;*          T  I  M  E  B  A  S  E            *
  5642. ;*                                        *
  5643. ;***************************************
  5644. ;
  5645. ;
  5646. ; pascal TimeBase NewTimeBase(void )
  5647. ;
  5648.     IF ¬ GENERATINGCFM THEN
  5649.         Macro
  5650.         _NewTimeBase
  5651.             move.w              #$00A5,D0
  5652.             dc.w                $AAAA
  5653.         EndM
  5654.     ELSE
  5655.         IMPORT_CFM_FUNCTION NewTimeBase
  5656.     ENDIF
  5657.  
  5658. ;
  5659. ; pascal void DisposeTimeBase(TimeBase tb)
  5660. ;
  5661.     IF ¬ GENERATINGCFM THEN
  5662.         Macro
  5663.         _DisposeTimeBase
  5664.             move.w              #$00B6,D0
  5665.             dc.w                $AAAA
  5666.         EndM
  5667.     ELSE
  5668.         IMPORT_CFM_FUNCTION DisposeTimeBase
  5669.     ENDIF
  5670.  
  5671. ;
  5672. ; pascal TimeValue GetTimeBaseTime(TimeBase tb, TimeScale s, TimeRecord *tr)
  5673. ;
  5674.     IF ¬ GENERATINGCFM THEN
  5675.         Macro
  5676.         _GetTimeBaseTime
  5677.             move.w              #$00A6,D0
  5678.             dc.w                $AAAA
  5679.         EndM
  5680.     ELSE
  5681.         IMPORT_CFM_FUNCTION GetTimeBaseTime
  5682.     ENDIF
  5683.  
  5684. ;
  5685. ; pascal void SetTimeBaseTime(TimeBase tb, const TimeRecord *tr)
  5686. ;
  5687.     IF ¬ GENERATINGCFM THEN
  5688.         Macro
  5689.         _SetTimeBaseTime
  5690.             move.w              #$00A7,D0
  5691.             dc.w                $AAAA
  5692.         EndM
  5693.     ELSE
  5694.         IMPORT_CFM_FUNCTION SetTimeBaseTime
  5695.     ENDIF
  5696.  
  5697. ;
  5698. ; pascal void SetTimeBaseValue(TimeBase tb, TimeValue t, TimeScale s)
  5699. ;
  5700.     IF ¬ GENERATINGCFM THEN
  5701.         Macro
  5702.         _SetTimeBaseValue
  5703.             move.w              #$00A8,D0
  5704.             dc.w                $AAAA
  5705.         EndM
  5706.     ELSE
  5707.         IMPORT_CFM_FUNCTION SetTimeBaseValue
  5708.     ENDIF
  5709.  
  5710. ;
  5711. ; pascal Fixed GetTimeBaseRate(TimeBase tb)
  5712. ;
  5713.     IF ¬ GENERATINGCFM THEN
  5714.         Macro
  5715.         _GetTimeBaseRate
  5716.             move.w              #$00A9,D0
  5717.             dc.w                $AAAA
  5718.         EndM
  5719.     ELSE
  5720.         IMPORT_CFM_FUNCTION GetTimeBaseRate
  5721.     ENDIF
  5722.  
  5723. ;
  5724. ; pascal void SetTimeBaseRate(TimeBase tb, Fixed r)
  5725. ;
  5726.     IF ¬ GENERATINGCFM THEN
  5727.         Macro
  5728.         _SetTimeBaseRate
  5729.             move.w              #$00AA,D0
  5730.             dc.w                $AAAA
  5731.         EndM
  5732.     ELSE
  5733.         IMPORT_CFM_FUNCTION SetTimeBaseRate
  5734.     ENDIF
  5735.  
  5736. ;
  5737. ; pascal TimeValue GetTimeBaseStartTime(TimeBase tb, TimeScale s, TimeRecord *tr)
  5738. ;
  5739.     IF ¬ GENERATINGCFM THEN
  5740.         Macro
  5741.         _GetTimeBaseStartTime
  5742.             move.w              #$00AB,D0
  5743.             dc.w                $AAAA
  5744.         EndM
  5745.     ELSE
  5746.         IMPORT_CFM_FUNCTION GetTimeBaseStartTime
  5747.     ENDIF
  5748.  
  5749. ;
  5750. ; pascal void SetTimeBaseStartTime(TimeBase tb, const TimeRecord *tr)
  5751. ;
  5752.     IF ¬ GENERATINGCFM THEN
  5753.         Macro
  5754.         _SetTimeBaseStartTime
  5755.             move.w              #$00AC,D0
  5756.             dc.w                $AAAA
  5757.         EndM
  5758.     ELSE
  5759.         IMPORT_CFM_FUNCTION SetTimeBaseStartTime
  5760.     ENDIF
  5761.  
  5762. ;
  5763. ; pascal TimeValue GetTimeBaseStopTime(TimeBase tb, TimeScale s, TimeRecord *tr)
  5764. ;
  5765.     IF ¬ GENERATINGCFM THEN
  5766.         Macro
  5767.         _GetTimeBaseStopTime
  5768.             move.w              #$00AD,D0
  5769.             dc.w                $AAAA
  5770.         EndM
  5771.     ELSE
  5772.         IMPORT_CFM_FUNCTION GetTimeBaseStopTime
  5773.     ENDIF
  5774.  
  5775. ;
  5776. ; pascal void SetTimeBaseStopTime(TimeBase tb, const TimeRecord *tr)
  5777. ;
  5778.     IF ¬ GENERATINGCFM THEN
  5779.         Macro
  5780.         _SetTimeBaseStopTime
  5781.             move.w              #$00AE,D0
  5782.             dc.w                $AAAA
  5783.         EndM
  5784.     ELSE
  5785.         IMPORT_CFM_FUNCTION SetTimeBaseStopTime
  5786.     ENDIF
  5787.  
  5788. ;
  5789. ; pascal long GetTimeBaseFlags(TimeBase tb)
  5790. ;
  5791.     IF ¬ GENERATINGCFM THEN
  5792.         Macro
  5793.         _GetTimeBaseFlags
  5794.             move.w              #$00B1,D0
  5795.             dc.w                $AAAA
  5796.         EndM
  5797.     ELSE
  5798.         IMPORT_CFM_FUNCTION GetTimeBaseFlags
  5799.     ENDIF
  5800.  
  5801. ;
  5802. ; pascal void SetTimeBaseFlags(TimeBase tb, long timeBaseFlags)
  5803. ;
  5804.     IF ¬ GENERATINGCFM THEN
  5805.         Macro
  5806.         _SetTimeBaseFlags
  5807.             move.w              #$00B2,D0
  5808.             dc.w                $AAAA
  5809.         EndM
  5810.     ELSE
  5811.         IMPORT_CFM_FUNCTION SetTimeBaseFlags
  5812.     ENDIF
  5813.  
  5814. ;
  5815. ; pascal void SetTimeBaseMasterTimeBase(TimeBase slave, TimeBase master, const TimeRecord *slaveZero)
  5816. ;
  5817.     IF ¬ GENERATINGCFM THEN
  5818.         Macro
  5819.         _SetTimeBaseMasterTimeBase
  5820.             move.w              #$00B4,D0
  5821.             dc.w                $AAAA
  5822.         EndM
  5823.     ELSE
  5824.         IMPORT_CFM_FUNCTION SetTimeBaseMasterTimeBase
  5825.     ENDIF
  5826.  
  5827. ;
  5828. ; pascal TimeBase GetTimeBaseMasterTimeBase(TimeBase tb)
  5829. ;
  5830.     IF ¬ GENERATINGCFM THEN
  5831.         Macro
  5832.         _GetTimeBaseMasterTimeBase
  5833.             move.w              #$00AF,D0
  5834.             dc.w                $AAAA
  5835.         EndM
  5836.     ELSE
  5837.         IMPORT_CFM_FUNCTION GetTimeBaseMasterTimeBase
  5838.     ENDIF
  5839.  
  5840. ;
  5841. ; pascal void SetTimeBaseMasterClock(TimeBase slave, Component clockMeister, const TimeRecord *slaveZero)
  5842. ;
  5843.     IF ¬ GENERATINGCFM THEN
  5844.         Macro
  5845.         _SetTimeBaseMasterClock
  5846.             move.w              #$00B3,D0
  5847.             dc.w                $AAAA
  5848.         EndM
  5849.     ELSE
  5850.         IMPORT_CFM_FUNCTION SetTimeBaseMasterClock
  5851.     ENDIF
  5852.  
  5853. ;
  5854. ; pascal ComponentInstance GetTimeBaseMasterClock(TimeBase tb)
  5855. ;
  5856.     IF ¬ GENERATINGCFM THEN
  5857.         Macro
  5858.         _GetTimeBaseMasterClock
  5859.             move.w              #$00B0,D0
  5860.             dc.w                $AAAA
  5861.         EndM
  5862.     ELSE
  5863.         IMPORT_CFM_FUNCTION GetTimeBaseMasterClock
  5864.     ENDIF
  5865.  
  5866. ;
  5867. ; pascal void ConvertTime(TimeRecord *inout, TimeBase newBase)
  5868. ;
  5869.     IF ¬ GENERATINGCFM THEN
  5870.         Macro
  5871.         _ConvertTime
  5872.             move.w              #$00B5,D0
  5873.             dc.w                $AAAA
  5874.         EndM
  5875.     ELSE
  5876.         IMPORT_CFM_FUNCTION ConvertTime
  5877.     ENDIF
  5878.  
  5879. ;
  5880. ; pascal void ConvertTimeScale(TimeRecord *inout, TimeScale newScale)
  5881. ;
  5882.     IF ¬ GENERATINGCFM THEN
  5883.         Macro
  5884.         _ConvertTimeScale
  5885.             move.w              #$00B7,D0
  5886.             dc.w                $AAAA
  5887.         EndM
  5888.     ELSE
  5889.         IMPORT_CFM_FUNCTION ConvertTimeScale
  5890.     ENDIF
  5891.  
  5892. ;
  5893. ; pascal void AddTime(TimeRecord *dst, const TimeRecord *src)
  5894. ;
  5895.     IF ¬ GENERATINGCFM THEN
  5896.         Macro
  5897.         _AddTime
  5898.             move.w              #$010C,D0
  5899.             dc.w                $AAAA
  5900.         EndM
  5901.     ELSE
  5902.         IMPORT_CFM_FUNCTION AddTime
  5903.     ENDIF
  5904.  
  5905. ;
  5906. ; pascal void SubtractTime(TimeRecord *dst, const TimeRecord *src)
  5907. ;
  5908.     IF ¬ GENERATINGCFM THEN
  5909.         Macro
  5910.         _SubtractTime
  5911.             move.w              #$010D,D0
  5912.             dc.w                $AAAA
  5913.         EndM
  5914.     ELSE
  5915.         IMPORT_CFM_FUNCTION SubtractTime
  5916.     ENDIF
  5917.  
  5918. ;
  5919. ; pascal long GetTimeBaseStatus(TimeBase tb, TimeRecord *unpinnedTime)
  5920. ;
  5921.     IF ¬ GENERATINGCFM THEN
  5922.         Macro
  5923.         _GetTimeBaseStatus
  5924.             move.w              #$010B,D0
  5925.             dc.w                $AAAA
  5926.         EndM
  5927.     ELSE
  5928.         IMPORT_CFM_FUNCTION GetTimeBaseStatus
  5929.     ENDIF
  5930.  
  5931. ;
  5932. ; pascal void SetTimeBaseZero(TimeBase tb, TimeRecord *zero)
  5933. ;
  5934.     IF ¬ GENERATINGCFM THEN
  5935.         Macro
  5936.         _SetTimeBaseZero
  5937.             move.w              #$0128,D0
  5938.             dc.w                $AAAA
  5939.         EndM
  5940.     ELSE
  5941.         IMPORT_CFM_FUNCTION SetTimeBaseZero
  5942.     ENDIF
  5943.  
  5944. ;
  5945. ; pascal Fixed GetTimeBaseEffectiveRate(TimeBase tb)
  5946. ;
  5947.     IF ¬ GENERATINGCFM THEN
  5948.         Macro
  5949.         _GetTimeBaseEffectiveRate
  5950.             move.w              #$0124,D0
  5951.             dc.w                $AAAA
  5952.         EndM
  5953.     ELSE
  5954.         IMPORT_CFM_FUNCTION GetTimeBaseEffectiveRate
  5955.     ENDIF
  5956.  
  5957. ;
  5958. ;***************************************
  5959. ;*                                        *
  5960. ;*          C  A  L  L  B  A  C  K             *
  5961. ;*                                        *
  5962. ;***************************************
  5963. ;
  5964. ;
  5965. ; pascal QTCallBack NewCallBack(TimeBase tb, short cbType)
  5966. ;
  5967.     IF ¬ GENERATINGCFM THEN
  5968.         Macro
  5969.         _NewCallBack
  5970.             move.w              #$00EB,D0
  5971.             dc.w                $AAAA
  5972.         EndM
  5973.     ELSE
  5974.         IMPORT_CFM_FUNCTION NewCallBack
  5975.     ENDIF
  5976.  
  5977. ;
  5978. ; pascal void DisposeCallBack(QTCallBack cb)
  5979. ;
  5980.     IF ¬ GENERATINGCFM THEN
  5981.         Macro
  5982.         _DisposeCallBack
  5983.             move.w              #$00EC,D0
  5984.             dc.w                $AAAA
  5985.         EndM
  5986.     ELSE
  5987.         IMPORT_CFM_FUNCTION DisposeCallBack
  5988.     ENDIF
  5989.  
  5990. ;
  5991. ; pascal short GetCallBackType(QTCallBack cb)
  5992. ;
  5993.     IF ¬ GENERATINGCFM THEN
  5994.         Macro
  5995.         _GetCallBackType
  5996.             move.w              #$00ED,D0
  5997.             dc.w                $AAAA
  5998.         EndM
  5999.     ELSE
  6000.         IMPORT_CFM_FUNCTION GetCallBackType
  6001.     ENDIF
  6002.  
  6003. ;
  6004. ; pascal TimeBase GetCallBackTimeBase(QTCallBack cb)
  6005. ;
  6006.     IF ¬ GENERATINGCFM THEN
  6007.         Macro
  6008.         _GetCallBackTimeBase
  6009.             move.w              #$00EE,D0
  6010.             dc.w                $AAAA
  6011.         EndM
  6012.     ELSE
  6013.         IMPORT_CFM_FUNCTION GetCallBackTimeBase
  6014.     ENDIF
  6015.  
  6016. ;
  6017. ; pascal OSErr CallMeWhen(QTCallBack cb, QTCallBackUPP callBackProc, long refCon, long param1, long param2, long param3)
  6018. ;
  6019.     IF ¬ GENERATINGCFM THEN
  6020.         Macro
  6021.         _CallMeWhen
  6022.             move.w              #$00B8,D0
  6023.             dc.w                $AAAA
  6024.         EndM
  6025.     ELSE
  6026.         IMPORT_CFM_FUNCTION CallMeWhen
  6027.     ENDIF
  6028.  
  6029. ;
  6030. ; pascal void CancelCallBack(QTCallBack cb)
  6031. ;
  6032.     IF ¬ GENERATINGCFM THEN
  6033.         Macro
  6034.         _CancelCallBack
  6035.             move.w              #$00B9,D0
  6036.             dc.w                $AAAA
  6037.         EndM
  6038.     ELSE
  6039.         IMPORT_CFM_FUNCTION CancelCallBack
  6040.     ENDIF
  6041.  
  6042. ;
  6043. ;***************************************
  6044. ;*                                        *
  6045. ;*          C L O C K   C A L L B A C K      *
  6046. ;*                S U P P O R T              *
  6047. ;*                                        *
  6048. ;***************************************
  6049. ;
  6050. ;
  6051. ; pascal OSErr AddCallBackToTimeBase(QTCallBack cb)
  6052. ;
  6053.     IF ¬ GENERATINGCFM THEN
  6054.         Macro
  6055.         _AddCallBackToTimeBase
  6056.             move.w              #$0129,D0
  6057.             dc.w                $AAAA
  6058.         EndM
  6059.     ELSE
  6060.         IMPORT_CFM_FUNCTION AddCallBackToTimeBase
  6061.     ENDIF
  6062.  
  6063. ;
  6064. ; pascal OSErr RemoveCallBackFromTimeBase(QTCallBack cb)
  6065. ;
  6066.     IF ¬ GENERATINGCFM THEN
  6067.         Macro
  6068.         _RemoveCallBackFromTimeBase
  6069.             move.w              #$012A,D0
  6070.             dc.w                $AAAA
  6071.         EndM
  6072.     ELSE
  6073.         IMPORT_CFM_FUNCTION RemoveCallBackFromTimeBase
  6074.     ENDIF
  6075.  
  6076. ;
  6077. ; pascal QTCallBack GetFirstCallBack(TimeBase tb)
  6078. ;
  6079.     IF ¬ GENERATINGCFM THEN
  6080.         Macro
  6081.         _GetFirstCallBack
  6082.             move.w              #$012B,D0
  6083.             dc.w                $AAAA
  6084.         EndM
  6085.     ELSE
  6086.         IMPORT_CFM_FUNCTION GetFirstCallBack
  6087.     ENDIF
  6088.  
  6089. ;
  6090. ; pascal QTCallBack GetNextCallBack(QTCallBack cb)
  6091. ;
  6092.     IF ¬ GENERATINGCFM THEN
  6093.         Macro
  6094.         _GetNextCallBack
  6095.             move.w              #$012C,D0
  6096.             dc.w                $AAAA
  6097.         EndM
  6098.     ELSE
  6099.         IMPORT_CFM_FUNCTION GetNextCallBack
  6100.     ENDIF
  6101.  
  6102. ;
  6103. ; pascal void ExecuteCallBack(QTCallBack cb)
  6104. ;
  6105.     IF ¬ GENERATINGCFM THEN
  6106.         Macro
  6107.         _ExecuteCallBack
  6108.             move.w              #$012D,D0
  6109.             dc.w                $AAAA
  6110.         EndM
  6111.     ELSE
  6112.         IMPORT_CFM_FUNCTION ExecuteCallBack
  6113.     ENDIF
  6114.  
  6115. ;
  6116. ;***************************************
  6117. ;*                                        *
  6118. ;*          S Y N C    T A S K S              *
  6119. ;*                S U P P O R T              *
  6120. ;*                                        *
  6121. ;***************************************
  6122. ;
  6123. ;
  6124. ; pascal OSErr QueueSyncTask(QTSyncTaskPtr task)
  6125. ;
  6126.     IF ¬ GENERATINGCFM THEN
  6127.         Macro
  6128.         _QueueSyncTask
  6129.             move.w              #$0203,D0
  6130.             dc.w                $AAAA
  6131.         EndM
  6132.     ELSE
  6133.         IMPORT_CFM_FUNCTION QueueSyncTask
  6134.     ENDIF
  6135.  
  6136. ;
  6137. ; pascal OSErr DequeueSyncTask(QTSyncTaskPtr qElem)
  6138. ;
  6139.     IF ¬ GENERATINGCFM THEN
  6140.         Macro
  6141.         _DequeueSyncTask
  6142.             move.w              #$0204,D0
  6143.             dc.w                $AAAA
  6144.         EndM
  6145.     ELSE
  6146.         IMPORT_CFM_FUNCTION DequeueSyncTask
  6147.     ENDIF
  6148.  
  6149. ;  UPP call backs 
  6150.     ENDIF
  6151.     ENDIF ; __MOVIES__ 
  6152.  
  6153.